
ATARI nous a tous 
prispourdescons! 



Vous avez commande un logiciel 
Alan a Hebdogiciel depuis cinq, 
six, voire dix semaines et vous ne 
lavez pas regu ? Ce nest pas 
grave, attendez done encore six 
mois ou un an ! 

Vous avez pris la peine de nous 
ecfire pour nous passer une 
commande de logiciel Atari, de 
nous envoyer un cheque, de 
payer ie timbre et d'alier a la 
poste pour nous 1'expedier. Nous 
vous avons renvoye Ie cheque et 
vous n'avez toujours pas Ie logi- 
ciel en question ? Ce n'est pas 
grave, jouez done a autre chose, 
et puis vous n'avez que ca a fairs 
et Hebdogiciel aussi ! 
Vous attendiez Joust pour Apple 
ou Dig Dug pour Vic 20 ? Atari ne 
Ie sortira probabiement jamais 
mais ce n'est pas grave, il existe 
d'autres logiciels de jeu et vous 
n'etes jamais qu'un consomma- 
teur ! 

Vous prenez Hebdogiciel pour 
des rigolos: comment peuvent-ils 
faire une pieine page de publi- 
city, a leur frais. pendant onze 
semames pour des softs Atari 
qu ils ne livrent pas ? Ce n'est 
pas grave, allez done vous (aire 
cuire un oeuf ! 

El vous. Hebdogiciel avec voire 
petit hippocampe. vous etes 
jeunes et amusants, nous avons 
fait de bonnes affaires ensemble, 
non ? Ce n'est pas bien grave si 
vos lecteurs ne son! pas 
contents, ils s'arreieront bien de 
rouspeter un jour, non ? Vous 
passez pour des rigolos 7 Si vous 
n etes pas contents .... ,. 
En gros. voila le discours qu'au- 
raient pu vous tenir les services 
commerciaux d'AIan si vous 
aviez eu affaire a eux drrecte- 
ment. Le probleme e'est que jus- 



tement vous n'avez pas affaire a 
eux directement: Hebdogiciel est 
I'intermediaire qui a cautionne la 
vente de ces jeux et Hebdogiciel 
attaque Atari devant les tribunaux 
competents. Nous tenons a notre 
image de marque ! Mais n'antici- 
pons pas. je vais vous raconter 
toute I'histoire, vous allez voir ce 
n'est pas triste : Atarigolons un 
brin ! 

Vers la fin du mois de Mai. j'ap- 
prends qu'Atari s'apprete a sortir 
des logiciels de ses celebres jeux 
de cafe sur quatre ordinateurs. 
Voyant qu'il s'agit de jeux aussi 
connus que dig dug, centipede et 
donkey kong ou encore de jeux' 
ires rGcents comme Pole Posi- 
tion, j'appelle les services 
commerciaux d'Atari France pour 
passer d'urgence une 

commande. II me faudra attendre 
le 26 ]uin pour avoir la visile d'un 
representant: plus de trois semai- 
nes dattente et des dizaines de 
coups de telephone pour avoir le 
droit d'acheter des logiciels. 
c'6tait plutot mal parti ! Enfin la 
commande est tout de meme 
passee et le 26 juin on me pro- 
met la livraison immediate de 680 
logiciels representant 42 produits 
differents. Cette promesse etant 
assortie d'un bon de commande 
en bonne et due forme et le delai 
de livraison "Immediat et urgent" 
y figurant par ecrit. la campagne 
de publicity est mise en route: le 
6 juillet nous faisons la une de 
I'hebdo avec les Atansoft et nous 
demarrons la page de publicity 
pour la vente par correspon- 
dance. 

Le 2 juillet. nous recevons la li- 
vraison "immediate et urgente' 
avec une legere difference par 
rapport a la commande initiate : il 



n'y a que 165 logiciels sur les 
680 commandes et seulement 19 
titres de livres sur 42 ! 
Et e'est ici que le cauchemar 
commence Atari France va 

avancer toutes les excuses pos- 
sibles et imaginabies pour ne pas 
honorer ses engagements : les 
produits sont coinces au stock, 
au depot, dans un camion, dans 
les toilettes, chez ma tante. Les 
emballages ne sont pas confor- 
mes. les etiquettes sont a I'en- 
vers, les modes demploi ne sont 
pas en francais. Le service livrai- 
son est surcharge, le service ex- 
pedition est en vacances. la di- 
rection est en conference et le 
service commercial est fatigue. 
Et pendant ce temps la, vous 
nous envoyez des commandes. 
des dizaines. des centaines et 
bientdt des milliers de comman- 
des ' Tous les jours nous I6I6- 
phonons pour obtenir la livraison 
des produits commandes. tous 
les jours on nous reponds avec 
une nouvelle excuse et on nous 
affirme que *enfin, ca y est . ils 
sont la, on vous livre domain r. 
Nous laissons. deux personnes 
dans les locaux ou nous slockons 
les logiciels pendant tout le mois 
d'aout pour attendre la livraison 
qui arrive demain, toujours de- 
main: ils attendront en vain pen- 
dant toutes les vacances ! Le 14 
aoOt on nous livre une nouvelle 
commande de Pole Position pour 
Texas: 100 pieces, mais toujours 
pas les autres I Le 23 aoOl. 200 
Pole Position, toujours pour 
Texas et toujours rien pour les 
autres ! Et ainsi de suite pendant 
1 1 semaines ! Et teujours pas de 
lettres, toujours pas de coups de 
fil concernant ces retards ! Et 
toujours aucun moyen d'obtenlr 



un responsable au telephone, a 
croire qu'il passe ses journees en 
conference et ses nuits en reu- 
nion ! 

Et pendant ce temps la nous 
vous renvoyons vos cheques: 
quand vous avez commande plu- 
sieurs logiciels, il faut vous livrer 
ce qui est en stock et vous faire 
un cheque pour les produits Atari 
non livres. Esperant toujours 
qu'ils vont enfin tenir leur pro- 
messe, nous allons meme jus- 
qu'a ne pas renvoyer les cheques 
sous huit jours puisqu'ils vont li- 
vrer demain I 

Heureusement que nous ne fai- 
sons pas partie des gens qui en- 
caissent les cheques avant de li- 
vrer. 

Et le 10 septembre. e'est le bou- 
quet final. "ca y est. tout est dis- 
ponible. nous vous livrons de- 
main (pour changer un peu I ) 
mais il y a un petit probleme : 
certains logiciels ne sont pas dis- 
ponibles, ne le seront pas avant 
longtemps ou peut-etre jamais" ! 
Et on nous remet un tres joli pa- 
pier, avec les dates' de disponibi- 
lite qui s'echelonnent de "disponi- 
ble immediatement" a "?*. oul. 
oui, vous avez bien lu : delai de 
disponibilite - point d'interroga- 
tion. pour des produits qui figu- 
raient sur la commande d'origine 
du mois de Juin ! Trois mois apres 
avoir pris une commande pour "li- 
vraison immediate ", Atari an- 
nonce un delai inconnu pour les 
mdmes produits. il faut le (aire. 
non ? Et certains produits sont 
purement et simplement suppri- 
mes du catalogue, et allez done ! 
Vous etes d'accord avec moi ? Ils 
nous ont vraiment tous pris pour 
des cons I 
Notre gentillesse a ses limites el 



nous n'acceptons ni pour nous ni 
pour les lecteurs d'Hebdogiciel 
de nous faire traiter de la sorte 
nous les attaquons devant les tri- 
bunaux. meme si nous sommes 
un "petit journal de rigolos" qui 
s'attaquent au monstre internatio- 
nal quest Atari et nous arretons 
de vendre leurs produits. 
Les lois sont faitos poi.r tout le 
monde. y compris pour Atari et 
pour les societes americaines. Et 
que ceux de nos fournisseurs ac- 
tuels ou futurs qui pensent qu'il 
vaut mieux ne rien vendre a un 
journal qui a une aussi mauvaise 
"mentalite" que la notre, se sou- 
viennent que les lois sur les rofus 
de vente existent aussi pour tout 
le monde 1 

Pour essayer de nous faire par- 
donner d'avoir ete la cause bien 
involontaire d'une deception (si 
minime soit-elle). nous ferons 
une remise de 10% sur leur pro- 
chain achat a tous ceux qui ont 
commande des logiciels Atari et 
qu) ne les ont pas recus. Cette 
remise est cumulable avec la re- 
mise abonne, 

Si e'est votre cas. gardez le cour- 
ier quo vous avez rocu quand 
nous vous avons renvoye votre 
cheque et joignez-le a voire pro- 
chain achat en enlevant vous- 
meme 10 % sur le montant total 
de la commande. Si vous faites 
partie de ceux qui ont encore des 
problemes a ce sujet ou si vous 
avez jete le courrier en question, 
ne nous telephone* pas. le stan- 
dard va exploser : ecrivez nous 
plutot pour que nous vous ren- 
voyons un bon de 10 % de re- 
mise sur votre prochain achat. 



Gerard CECCALDI 
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RING 



Toutes les places sont louees. Le plus grand malch de 
boxe va commencer dans quelques instants. II se tait 
en 10 rounds de 3 minutes. Qui va gagner? Les pans 
sont ouverts! 
Le mode d'emploi est dans le programme. 

Didier DELANSAY 




100 REM TI POSIC ETENPU 

110 REM RING 

120 FW.H D. OELAWSAY 

,E*W ii CALL 5CREENU31 
1*0 CALL CLEAR ■> FOR 1-2 TO 12 t. CALL 
CCLORU.3.l3):i t>C«T 1 II CALL COLOR 1 1 , I 

13© RESTORE 24P II OOSU8 l"»30 

160 CALL CMARtirO, -03030403l>Elor«4CD*E** 

70703O«K<A3£COAO6OCO7OOer4322827E&EOA090a 

67C-) 

170 CALL CNV«(13::.-E3E3A<V»34E20l00CO40*0 

?07030*OA3EC 7A7 A3C < J72O428S02O2oe0EO«04X)3 

07C"> 

ISO CALL SPRITE l"29, 128. ■». 110. 1.0, lb) ■ i 

CALL MAGNIFY 14) 

t**0 DISPLAY flTi::,4)!"Voul»I-voui lira 1 

*- :: DISPLAY AT 123. 6) t -Ragta du Jau-(0/ 

;oo goto rro 

riO CALL PATTEPJM(»29, 1321 i: FOR I-I TO I 

OO :: N£*T I II CALL PATTERNIWIS. I2S) 

220 RESTORE 3lO II SOSUB 1990 

230 CALL HEY(0,K,S)i: IF K-79 OR K»110 T 

MEN 3*0 !! IF K-7» OR K.-111 THEN 240 ELS 

E 210 

240 REM PRESENTATION 

23© DATA 82,92.82,0. 0.73, 0.78. 0,0,78.0.7 

1,71.71,0 

260 DATA 82. 0,0,82.0,73.0, 78,78,0,78,0, 7 

1.0.0.0 

270 DATA 82, 82. 82. 0,0. 73, 0.7B. 0,78, 78,0. 

71.0.71.71 

290 DATA 32.0.82.0.0.73.0,78,0,0,78,0,71 

.0,0,71 

290 DATA 82.0.0.82,0, 73, 0.7B, 0,0, 78,0.71 

.71.71,71 

300 REM HUSIOUE 

310 DATA 200,784.200.880,100, 1047. lOO. 96 

8.200.980.100.1173. 10O, 1047. 400, "»8B 

320 DATA 100.1319,100,1173,100.1047,100, 

90S, 200, 890. 200. 93 1 . 400. 980 

330 DATA 73.220,23.242.30.220,30.220.73. 

220, 23, 2*2, lOO, 220 

340 DATA 30.2A2.30.294. 10O.2A2, 100.220.3 

0,196, SO, 196,30,220.800,220 

330 REM REGLE OU JEU 

360 CALL CLEAR :: CALL DELSPRI TE (1128) 

S70 DATA 3,8,REGLE DU JEU 

390 DATA 6,8, 

390 DATA 10, 1, RING ast un combat da boxa 
«00 DATA It, I, qui «a Jou» a dau* ■ 
410 DATA 13,1, (LM 1 1 m t«* Ou ring lont 
420 DATA 13. 1 ,r(pcrt*l par lei 4 point*) 

430 data 13,1,1a Hatch %a dacoapoaa an 

440 DATA 16, 1, round at laa point* »ont 

460 DATA 19,1, -Si le coup *«t port* Jf 

470 DATA 20,4, -U tata *10 pt* 

*BO OATA 21. 4, -la corp» * 3 pt» 

490 OATA 22,4,-lw J lilll 3 pt* 

SCO OATA 24,l.Appuyar lur una touch*... 
310 DATA It, I. Au bout d* IO coups porta* 
320 DATA 12, I, a !» tata d*n» un aanta POu 

330 DATA 13, 1,-od la jouaur a»t KO at ■ 
340 DATA 14,l.p*rdu la partia. 

330 DATA 17, i.'j'.i 1 itt: la bouton TIR pou 

340 DATA 13,1. porta' un coup. 

370 S-'.4 •• RESTORE 370 t: GOSUB 1880 



MAXIT 



380 8-6 t I RESTORE 310 I 

390 CALL DELSPR1TEIB28) 

600 CALL CLEAR 

610 REM RING 

620 CALL MAGNIF' 



GOSUD 1BBO 



OOOOOOOOOOOOFFOO" ) 
1 02020 40408OFF0O" I 
010102020404 0808-1 
11112222444488GB") 
1010202040408080") 
1111222244448889") 
OI0I02O204040908-) 
-OIO1O3030707OF0F- I 
-1F1F3F3F7F7FFFFF-: 
RPT»<"F", 16)1 
-FFFFFEFEFCFCFBFB-I 
■FOFOEOEOCOC 08090- ! 
"FFFFFEPEFCFCF8F8": 



9181") 



630 CALL CHAR II 

640 CALL CHARIB9,' 

630 CALL CHAR 190." 

660 CALL CMAR<<: 

670 CALL CMARI92, 

690 CALL CHAR 196, 

690 CALL CMARI1 

700 CALL CHARM 

710 CALL CHAR I ! 

720 CALL C 

730 CALL CHAR I : 

740 CALL CMARII 

730 CALL CHAR I : 

760 CALL I 

770 CALL CHARI134,RPT»(-F", 16: 

7B0 CALL CHARI63, "7EFFFF9I919: 

790 CALL CHAR(64.RPT»t"F-, 16) 1 

BOO FOR J-t TO 14 i: CALL COLOR! J , 2, 2) 1 I 

NEXT J 
810 FOR 1-1 TO 2 ii CALL HCHAR 1 1 , 1 , 122,3 
2)11 NEXT I 

820 CALL HCHAftI3,l,32,704) 
B30 X-10 II Y-9 II 1-31 
B40 FOR 1-6 TO 20 STEP 2 

830 CALL HCHARII,*. 122,21): I CALL HCHAR ( 
1*1, t, 122,21)i: CALL HCHARII.Y, 136)11 CA 
LL HCHARII*!, Y, 137) 

840 CALL HCHARII, Z, 123)1! CALL HCHAR 1 1 ♦ 1 
,Z, 124>n CALL HCHAft<I*2,I, 132):i CALL H 
CHARII+3.Z, 133)11 K»X-1 ■■ Y-Y-l II Z-Z- 

870 NEXT 1 

B80 CALL VCHARI6, 1I,64,2>H CALL VCHAR ( 1 
9,4,64,2)11 CALL VCHARI 19, 22, 64,2) 
B90 CALL HCHAR(4,12, 88,17)11 CALL HCHAR 1 
7,12,88,17)11 CALL HCHAftI 19, 3, BB, 17) I 1 C 
ALL HCHAR 120, 3, 89, 171 
900 X-IO tl FOR 1-7 TO 17 STEP 2 
910 CALL HCMARII.X, 90)n CALL HCHAR (1+1, 
X,91)ji CALL HCHAf»II*2,X,92) n X-X-l 
920 NEXT I 

930 X-28 it FOR 1-8 TO 19 STEP 2 
940 CALL HCHARII, X, 90)11 CALL HCHARII*!, 
1,911:: CALL HCHARI1*2.X, 92)11 X-X-l 
930 NEXT I 

960 CALL HCHAR! 19,3,89)1 I CALL HCHAR<8,2 
9,92)11 CALL HCHARI7, 29,96)1; CALL HCHAR 
(6,29.97) 

970 CALL HCHARC22, 2. 134,22)1 : CALL HCHAR 
C23,2,134,22)ii CALL HCHAR (IB, 6,63) s i CA 
LL HCHAR(9,27,63) 

990 CALL HCHARIB, tl, 103) Ii CALL HCHARI8, 
22.103)11 CALL HCHAR 1 18. I 1 , 103) i : CAUL H 
CHAR (18, 22, 103) 
990 FDR 1-2 TO 11 n CALL COLOR) I . 9,3) : : 

NEXT I 
100O CALL C0L0RI1, 13, 13,8, 16,3, 12,3,4, 13 
,*, 13,14,3, IB, 9, 16, v I 

1010 DISPLAY ATI1, !l t "PoInUimliiiiin 
ziPolntai "111 DISPLAY AT 1 1 , 12) : "ROUND! "I 
1020 REM LUTINS 

103O CALL CHAR(34,"0OO0IC12151212OC") 
1040 CALL CHARI33,-122133333339I11F") 
1030 CALL CHAR<36,-lFI2121214244660-> 
1060 CALL CHAR(37,"0O03FF - ) 
1070 CALL CHARI38.-OOCOFF") 
108O CALL CHAR(39,"O0OO384BAB4B4B30") 



IO90 CALL CMAR(40,-4884CCCCAC94BBFB") 

HOO CALL CHARI41, -FB48484B29246206") 

1110 CALL CHAR(42,"48740391FF-| 

1120 CALL CHAR(43,-1B7EBIB2FE08D0£0"> 

1130 CALL CHAR(44,-20D00881FB-) 

1140 CALL CHAR(4A,"OOOOCJC399B3A399") 

I ISO CALL CHAR 147, -66424242424A423C-) 

1160 CALL CHAR(62,-3C24242424242436") 

1170 CALL CHARI39, "003E2A08O80BO87F" > 

tlBO CALL CHAR(60,-0000004040FFCOCO") 

1190 CALL CHAR(61,"EOFB20202020202O") 

1200 REM JEU 

1210 CALL SPRITE(alS, 39, 16,178.232, #17,6 

1,2, 169,237) 

1220 CALL SPRITE(«1,34,3, 124, BO, #2, 35,5, 

132, BO, 13,36,3, 138, BO) 

1230 CALL SPRITE(«6,39.2.42, 169, »7, 40. 2, 

30, 168, H, 4 1,2, 38, 168) 

1240 FDR I-I TO 300 ii NEXT I 

1Z30 R0S,PA,P8-0 

1260 GDSUB 1600 

1270 T-T*l ii IF T-30O THEN GOSUB 1600 : 

i IF R09>tO THEN 1730 

12SO CALL JOYST(I,X,Y) 

1290 FOR J-l TO 3 i i CALL HOTIDN(*J,-Y, t 

) it NEXT J 

13O0 CALL POSITIONI»3,R,Cl ii IF R>-140 

R R<-36 THEN 1320 

1310 IF C>-176 OR C<-72 THEN 1320 ELSE 1 

340 

1320 CALL L0CATE<al,B4,12O,a2,92, 120, t3, 

lOO, 120, •6,74,130,47, B2,13O,a0,9O, 130) 

1330 8QTO 1440 

1340 CALL KEY(l,K,S)li IF «>18 THEN 144 

O 

1350 CALL POSlTION(42,R,CIII CALL SPRITE 



1360 CALL C0tNC(a4,«6,4,C)ii IF C'-l THE 

N 1390 

1370 CALL COINC(a4,a7,4,C) t i IF C— I THE 



IF C— 1 THE 



1400 
1390 CALL C01NC(a4,< 
N 1410 ELSE 1430 

1390 PA-RAHO ii CT-CT*1 I! GOTO 1420 
1400 PA-PA+3 Ii GOTO 1420 
1410 PA-PA-3 
1420 CALL SOUND(30,-7,0)I1 DISPLAY AT(3. 



IF CT-10 THEN 



. __P:PA|' 
1430 CALL DEI_SPRITE(a4) : 
1710 

1440 CALL J0YST(2,A,S> 

1430 FOR J-6 TO 8 II CALL MOTIONtaJ.-S, A 
):: NEXT J 

1460 CALL POSITI0NI48,R,C> i: IF R>-140 O 
R RT-36 THEN 1480 

1470 IF C>-176 OR C<-72 THEN I4B0 ELSE 1 
BOO 

14B0 CALL LOCATE <«t,S4, 120,i2.92, !20.t3, 
100, 120, •6,90, 130,47,99, 130, »8, 104, 130) 
1490 GOTO 1270 

1300 CALL KEY(2,K.S»II IF KOIB THEN 139 


1310 CALL POSITION(»7,R,C)i t-CALL SPRITE 
l«3,38,2,R,C-6) 
1320 CALL C0INC(a3,»l, 
N 1330 

1530 CALL COINC(»5,»2,4,C)ii IF C--1 THE 
N 1360 

1340 CALL caiNC<*3.*3,4,C)i! IF C — I THE 
N 1370 ELSE 1590 

1330 PB-P8*10 :: CT8-CTB+1 II GOTO 13B0 
1360 P8-PB*5 i: BOTO 1590 



IF C— 1 THE 



Tl-99 4/A 



1370 f 

1390 CALL SOUNDI30.-7.0) n DISPLAY AT(3, 

22)BEEP|PB|- "I 

1590 CALL DELSPRITEIMM t IF CT8-I0 THEN 

1730 ii GOTO 1270 
1600 REM ROUND 

1610 REF-0 :i CALL MOT I0N(»1 ,0. 0, "2,0, O, 
•3,0,0, •6,0,0, •7,0,0, MB, 0,0) 
1620 CALL PATT£RN(»l7,60)tI CALL SOUND(3 
O0,I76O,3):i CALL PATTERN(»17, 61 ) 
1630 IF REP-I THEN RETURN 

1640 CALL LOCATE (*3, 138,40. •2,132. 40,«1, 
1 24, 4O,*0, 38, 209, •7,30,209. •6,42, 209) 
1650 RESTORE 330 tl GOSUB 19BO 
1660 FOR 1-1 TO 20O it NEXT I II CT-O ■■ 

CTB-O :t T-0 n REP-1 ii RDS-RDS* 1 
1670 IF RDS>tO THEN DISPLAY AT(3,13)l*FI 
N-[""lELSE DISPLAY AT I 3, 13) iRDSl - "I 
1680 CALL L0CATE(»3, 139,90,»2. 132,BO,tl, 
124, 90, •8,38, 168,»7,30. 168,a6,42, 169) 
1690 GOTO 1620 
1700 REM KO 

1710 CALL POSITI0N(«B,R,C)i: CALL DELSPR 
ITEH4.»3,»6,«7,aB) ii CALL SPRITE (•?, 42. 
2 R C,«10,43,2,R.C*9,»11.44,2,R,C*I6) 
1720 P-0 il FOR 1-1 TO 6 n CALL SOUND 1 1 
00.392,P)n CALL SOUND! lOO, 440.P) I I P—P* 
1 : : NEXT I n GOTO 1770 

1730 CALL POSITION(*3,R.C)i i CALL DELSPR 
ITEI«l,»2,»3.a4,a3): i CALL SPRI TE l»9, 42, 
5,R,C,»10,43,5,R.C*B,«11,44,3,R,C*16) 
1740 P-0 II FDR 1-1 TO 6 ■■ CALL SOUND I 1 
00.392.P)!! CALL SOUND! lOO, 440.P) I I P-P* 
I ii NEXT I II GOTO 1BOO 
1730 REM FIN 
1760 IF PA-PB THEN 1820 tl IF PA<PB THEN 

IBOO 
1770 CALL PATTERN(«1,46) II CALL PATTERNI 
•2,47)11 CALL PATTERN(«3.62) 
1790 FOR 1-1 TO 3 tl CALL MOTION (•! ,0.0) 
it NEXT I 
1790 BOTO 1B20 

IBOO CALL PATTERN(«6,44)1 t CALL PATTERN! 
•7,47):: CALL PATTERN 1*8, 62) 
1B10 FOR 1-6 TO 8 II CALL MOT ION (• 1 , 0,0) 
■I NEXT I 

1820 FOR I-l TO 2 tl RESTORE 310 it GOSU 
B 1990 ii NEXT I n FOR I-l TO 10O0 tl N 
EXT I 

1B30 CALL CLEAR II CALL OELSPRITE (ALL) 
1840 FOR 1-2 TO 12 n CALL COLOR ! I ,5. 13) 
■■ NEXT I 

1830 DISPLAY AT 1 12,8) t "RaJOuai — vou«T" 
I860 CALL KEY(0,K,S)ii IF K-78 OR K-1I0 
THEN 1870 ii IF K-79 OR K-l 1 1 THEN 600 E 
LSE I860 
I870 END 

1880 FOR T-l TO S 

1890 READ R.C.A* n DISPLAY ATIR.CHA* 
190O NEXT T 

1910 CALL KEY!0,K,S)t: IF S-0 THEN 1910 
1920 CALL HCHAR (10, 1, 32,4*9)1 I RETURN 
1930 FDR K-6 TO 10 
1940 FDR J-9 TO 24 

1930 READ A t: IF A-O THEN I960 it CALL 
HCHAR(K,J,A) 
1960 NEXT J It NEXT K 
1970 RETURN 

1980 FOR J-l TO 13 n READ D.S ii CALL S 
OUNDID.S.O) 11 NEXT J It RETURN ■ 




MAXIT est un jeu de strateqie aux regies tres simples milieu et la fin de la partie necessiteni 3 a 4 coups premediies. Les 

(la reqle du jeu est donnee par le programme). II est «"» de P ar1ie ■** panicui.ercmen! mteressantes car los ienx pou- 

v y '^, '„,_.,' il.'LJr, K y s ' vent imooser des obliaations a I adversaire. 

compatible 0R1C 1/ATMOS. 

Hay SRUN 

Au debut, un choix n'entralne que oeu de con sequences mais le 



vent imposer des obligations a I'adversaire. 
L'ORIC n'esl qu'un partenaire moyen: il ne pretend pas gagner cha- 
que parlie (pene parfois due au hasard). Son jeu esl relativemen! 
mediocre maigre 3 coups premedites, car il part du principe que 
I'adversaire prend toujours le nombre le plus grand (ce qui est sou- 
vent le cas.). 



fRSJe- 



La presence des nombres negatits est interessante: c'est un ele- 
ment psychotogique (pas pour I'ORIC!) car les nombres negatits 
nous sont etrangers et nous font un pen peur, 

Le joueur, toujours gagnant (conlre I'ORIC) pourra lacilement chan- 
ger la structure du jeu de I'ORIC pour en trouver un moilleur. car 
c'est un proWeme de strategie relativement simple. Ici. c'est une 
version rapide, simple a comprondre pour eviter la contusion et une 
recherche (astidieuse. 
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*2 PEM 

+4 bspeps :•'■:. 

*Z PWE*«443-K 

*c, QIT*¥7.7 
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*8 WSiJB789e 

5» fOPI-eTOB 

32 CU»sei8.U2«.o DBRMI3I.IS.L 
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i» CLS'PalKT 

78 »IHTCM»»t4i.r>«»(27>.-J 
IWXIT II»-,CHP>-«) 

V. B£f1 

92 OZf INIT TABLFJ»J 

44 REM 

138 FOP1-8I07 

l« F0PJ-AT07 

17B P"FlaV23.» 

188 IF FMR> 3 —I T)4iH 0—0 

196 Ai 1 . J 1*9 

280 C'^SETH24.4,J«2*.e.« 

Z19 lCp<0T»CHCHHP*3.e.I 

^2e n.BT|nv4,0,8 
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;*8 P2-»83r0>-E>lil8 

238 IFOK'«THE" CHW*8«01.0.l 

268 CURMOVS-Oe CH»*8*02*.l 

278 14£XTJ 

298 HT/T1 
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I».- DE JOUEP.- 



I (fEn F|M OU JEU 

I »£H 

2988 TEXT 

2188 p»JWT-iii F[» ni- 

Z2»8 PRIHT PPIKT 

ON miMT* ■•COW-' 

2*«« PUIHT PRINT 

2388 GOVJ8<800 

2488 PPIHI PPIMI 

37 98 IFS1-S2TMEMPBIHTM0TCH HUL.- 

2728 IFSK52TMEHPBIHT-CEST "|J»»' 
E BEST." WT02899 

J749 PPIMt-BPRVO •.!•»• Il1 " 
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2928 pijM 
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i9S* "in 

3880 F0»I-er07 

WfV) 1F« I- I -■ -0IMEMJ118 

3109 "EX1 ->lT0?88e 

3139 X-X*l 

3208 IFX>6THEHK«a 

3238 IHWX.Y ••THEM 

I l.'t>4090 

ZTM 
3498 IFRf-CMIhK IJiiIHEnCEU.SH 
3498 f.i)'i'«49ee 03103139 

3468 REM 

34T0 &En jE<i/ JO-JEUP 2 

3*99 PE" 

3390 roRJ-8107 



3339 IFA<X.I><>9THE>mS0 

3698 NEXT 00102888 

3639 Y«Y*1 

3788 IFY-6T)4£HY-0 

JJ738 IFACX.Y>-8THf.H3«30 

■■.■ Strm 

3998 1F»»-CHP»( 13)IM£H»ETl»ni 
) C0SUB48M ' COT03S3B 



3?39 C 

3992 PEH ROUTINES WRPH1S« 
399* II 
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4818 

'■■;■■;■ 

ttal 



CUPSETXI24»2.Tf24»3.2 

D«rt*U19.9.Z Mrflue.13.2 

DRRM-l9.9.2'0RR*aJ.-12.a 

PETURN 

OTRSETX«Z*.Yi24»I,e 

F1LL23-4.K 

RETURN 

FOR1»8T03 

DDWaMtH 

HAIT13 

NEXT 

REIUPN 



>7THEHU-u*PGOTG5 

1 1FU-7THEH3988 

) FDBJ-HT07 

) X^KJ.V>'IFK>«(U,V)THENM-J 

' MEXT 

) OC-R<U,V>^2 



( F0BI-8T07 
I WC( I ) 

I 1FM>CAMDU<>9THEMY-I .C-M 



7218 
. .v 
7238 

.-,-4 

tot 

7278 
7288 



INPUT-NOM OU >DUEL») [II Ml 
IFDE*0rHEMJ«--nOl' RETURN 
IHPUT'MOH rw JOUf.1* E^l *.J» 
RETIRN 



._) RE7I - 
*9Z9 REM JEU DE L'( 



IIC 



6788 
6889 
6828 



I IFI 



t MWUm 



3928 C< I >-8 



3198 
3298 
3228 
32*9 
3268 
5388 
3329 



If w u, I >-9RNDU<>7THENH-M>i GOTO- 

l*M-7ANDS0'C)-SJTHENT-I ■RETURN 

1FU-7THENC-C-23 

F0SJ-HI07 

K'ff J. ( '■ H VrWi-U. 1 lIHtMW- J 

NEXT 



U>-9AKH*<>8THEI4J-W*1 C0T03 



RtnatH 

PRINI PKINT.PRINT 
PRIM1SPC<16-LEN< !•)). 
PR1MTSPCI 16-LEM( J* ) )i 
RETURN 

urn 

REM PRCSEMIHTION 
|M£H 

TEXT ■ CLS 

PRINT 

printi;hp*(4>>chr»<2;": 



?I48 PRIMT'VOULEZ-VWS Lft REGLE OU JE 



7178 

PIN 

7198 



«TA» PRIH1H* 
IFfi^-'O-lXLU.-MXJ 
PRINT 'PRINT 
PRIM1-E13 UN JOUEUR" 

) PRINT-[£3 DCUX JOUEUR- 



7319 

7498 

7*92 REM RECLE OU JEU 

^494 REM 

7388 as 
7383 PR1H1 PRINT 
7318 PRIHT-WKIT »»t ui 
«!» 4«1 R»u" 

."..■.' IVIMI 



c» illtnd (H- 
7338 PRIHT--23 * 23.L* Pr««l»r joumr 

cho»it un ' 

7368 PR!HT"no«**-» hw liont*!*"*'!.! «t 

I'wtr* jwj-" 

7378 PRIHt-»ur chotut vart let l**4ot. 

7388 PRIHT 

.-398 PRIMT-L» but »»l tt tot«ll»ar un 

Pl.jt orirrf - 

Ttm PRini-«ew* roMibl* 11 f * ut c 
lioltir «n 
^619 PRINr-ronction d* c» »u« »ourr» 

7620 PRniI-l'«pJv«r%jir».* 
,-6W iflNl.pRIHr 



'...UNE IOUCNE POU* CrjnT*LMC 



SECRET DE LA MOMI E SPEC TRUM 



Vous dtes I arch^ologue envoyo pour d6couvrir le fa- 
meux secret de la momie. Ne vous perdez pas parmi 
les 29 pieces de la pyramlde de Toutankhamon, ses 
oubliettes, ses trappes. ses passages secrets... Si vous 
reussissez, vous serez couvert dor. 

Vincent DUMESTRE 
Vous devez ressoriir vivant de la pyramide en ayanl avec vous. le 
"secret" de la momie Pour entrer dans la pyramide. vous avez 3 
possibles W (ouesl), S isud). E (est) Dans la pyramide. vous 
donnez des ordres Vous pouvez soufever, descendre. ouvrir, pren- 
dre Vous avez au depart 10 bougies avec vous Pour donner un 
ordre. il faul mettre les 3 premieres lettres du verbe. un espace et 
tes 3 premieres lettres du mot. Exemple: "OUV POH" pour OUVRE 
PORTE. 



Au debut du jeu. vous cherchez la cle du lombeau qui pourra vous 
mener au second etage Mais Anubis. Dieu qui protege les mons. 
essaye de s'approcher de la piece ou vous vous trouvez S il se 
trouve dans la meme piece que vous, il vous lue Le seul moyen 
dempecher qu Anubis se Irouve au meme endroil que vous. est de 
se procurer lamulette "Bes" qui, dans la legende egyptienne, vous 
protege contre les mauvais espnts Arrive au second etage, vous 
n aurez plus de problemes avec Anubis. il ne peut pas y acceder. 
Attention, la bougie se consume peu a peu...Quand vous voyez 
qu'elle lend a s'eteindre. prenez en une autre ("PRE BOLT). Un 
moyen rapide pour passer dune piece a I'autre (sans changer 
d'etage) est de soulever une trappe Mais faites attention de ne pas 
lomber dans une oublietie! 

La pluparl des coffres sont termes a del On ne peut garder sur soi 
quune seule clef et une seule amulette.. 
PS.: Mettez vous en CAPS LOCK 




1 »ee sztimi jw&\& 

Pftur SPECTRUM 

3 LET MLINT iSS^JfttPCC*. 3387 
».236toeen. 23673, PEEK 23672; ^39 

POKC 53562.1 POKC 23609.32 60 
ROER 1 PAPER 9 INK 6 CLS LE 

T 80. INT iRND*21tl LET PP-INT I 
PN0»3J .1 LET SA.0 .JO 6U6 6? 

3 LET CAR.0 LKT SCE«0 LET K 
E-.0 LET P-36 LET 8E-0 LET CT 
•9 LET JA.10 LET ClE-0 LET HT 

9 BEEP 0. 09.9 BEEP 9,03.3 

19 LET MOU-INT tRN0*S)*l. IF PI 

Ou.O then 00 to 9239 

33 CLS PLOT 107.13: DRAU 0,1 
39,461 

36 POINT AT 7.14, INK 5. "It, A 
T 9,13; INK 4, SECRET", PT 11,12, 
INK 3. 'at If. AT 13.13, INK 3, 
"MOMIE" 

27 Ink 7 PRINT PT 9,0, "U.QUnE 
STRE I meBOCGICIEL © 1984", AT 31 
,9. INK 3. APPUYER SUR ( ENT 
ER > INK 6 

36 PRUSE S CL3 00 SUB 3999 
00 Sue 399 

39 30 SUB 6999 

30 LET CPR»1 

89 30 TO 99 

B7 RESTORE POP F-9 TO 7i PER 
B POKE U3P "P".F,B. NEXT F: R 
ETUPN 

88 :■-"- 16.49.66,146,146,69,49 
■ l8 **2 

199 DATA 3, 1,3, 1,4, 1,8,1, «, 1,7, 
1.1,3.0.3,3,3,3.3,4,3,5,3,6,3,7. 

169 PRINT RT 19,0, "JE SuIS EN 
EMORS OE LR PYRPHIDE.IL VR 3 POP 
TES..OU UPIS-JE 7- 

133 INPUT At IF flt-'u" THEN LE 
T PIE-13 SO SUB 4109 SO TO 339 



SO SUB 4100; 00 TO 3199 

136 IF Rtw"U" P.N0 fl|i>"S" pnd 
" TMEN PRINT *1, "IMP0SSI8L 



199,69 DRRU 83,0. ORAU 100, -69 
PLOT 100,69 OPRU 9,83: ORRU 5 
8,0- DRAU 199.69 PLOT 100,115: 

ORRU -109,60 Plot 135,60. orru 
9,38 

163 PRUSE 199 CLS PRINT PT 1 
•<ll"UN COULOIR... ,PT 13,1, 'C'C 
TRIT UNE -AUSSE PISTE..." BEEP 
.6,6 PRUSe 90 

104 PAUSE 99 CLS PLOT 9,89 
DPRU 233,0 FOR F-ll TO 9 STEP - 
1 CIRCLE INK 3. 30, 90, F N8.XT F; 

PRINT 91, "..ET ME VQICI 0EM0R3 . 

*i«s pause ieo oo sua ise oo t 
o ibb 

166 FOR X-l TO 7; CLS : INK X: 
PRUse 9 BEEP .933,-30 PLOT 10 
9.60 OPRU 9,60 PLOT 199,90- DP 
AU 30.0 PLOT 139,80: OPRU 9,60 

PLOT 148,69 DPRU 13,89 ORRU 1 
3, -89 

187 plot 130.39. opru is,o pru 
se 19: next x ink. 6 return 
169 pruse 3*9 cls print rt 8 

,5. tilit(Ptn.«oui tltS r*»t£ 

AUSE'30» SO SUa"l66 90 TO ' 4750 

390 INK 8 CLS . PPIMT . PRINT 
PRINT . PRINT : PRINT "JE OESC 

ENDS PRP UN SSCALIER R H l PRIN 
T PRINT " ECMEL0N8 •"■ 
BEEP .3.17 BEEP .3,14 PRuSE 99 
CLS 

391 INK 6 FOP 0-1 TO 2: FOP F« 
39 TO 169 STEP 36 00 SUB 39S 
TO 393 

293 INK B PRUSE 30 BEEP .003, 
3 BEEP .093,3 PLOT 86, F DRRU 
0,-8 DPRU 2.-3 OPRU 130,0 ORA 
U 3. 3 ORPU 0,6 PLOT 64, F: ORPU 

0,-7. ORPU 3,-3 DAAU 133,9 OR 
RU 3,3 DPRU 4,7 RETURN 

293 NEXT P. CLS : NEXT O 

304 PAUSE 39: CLS 

393 PRINT AT 4, 1. "J'APAIUE ORNS 

UNE CRUE HUMZOE. .■'. OEEP .6,-38 

PRINT RT 5,6, " JENTRE. ■ . " BEE 

P .8,-31 PAUSE 30: CLS : 00 SUB 

306 SO TO 313 

310 PLOT 0,0 OPRU 60,40 OPRU 
138.0 DRAU 69,-40 ORPU 0,130 
&PAU -60,40 OPRU -135,9: ORAU - 
80, -40 iAfiU 0,-139 

ail PLOT 60,40 ORAU 9,130 PLO 
T 198,40 ORPU 0,130: PLOT 0,130 
OPRU 353,0 

313 LET XX-1. LET YY-364: FOP F 
•130 TO 170 STEP 3 PLOT XX, F. 
RAU rr ,0 LET XX«XX*3: LET w^vy 
-6 NEXT F RETURN 

313 INK 7: POP Z-l TO 3: IF Z-l 
TMEN LET MM-83: 

314 IF Z"3 THEN LET HM-136 
316 00 SUB 362 

316 NEXT Z INK 6 

330 PRUSE 190 CLS PRINT PT 6 
,0,*' Pinst ■'■■'* vout I* vovtZ.il 
v • 4tux '.'j'"«*. Rva< votrt CI 
«, '-,'11 pouvti ouvrir i'ur> 4** 

tftWX '.','lrtl. ',ci'jl' ct.'.ili 
mi *0U»7 (G4UCK" - 



F.l TO 33 READ A PAINT INK 3, 

CMP I Ifil . BEEP ,07,RND»10 NEXT 
F PAUSE 359: FLASM CLS 
233 DATA 32,32,76,69,32,63,67,6 

3,39,04.92,69,32.68,69,33,84,79. 

03,84,63,76,78,73.68,77,79.78,46 

,48,46, 33 

336 CLS : PRINT PT 10,0, IL NE 
PB3TE PLUS OUR REPARTIP,". PRIN 
T -^lE OEMONTE LES ESCALlERS . . . 

CAUSE 09 CLS 

337 FOR 0-1 TO 3: FOR F-160 TO 
20 STEP -36 00 SUB 302: NEXT F 

CLS NEXT IF SCE-1 TMEN 80 
TO 330 

336 PRINT : PRINT "ME UOICI PEU 
ENU DRNS LA PIECE 21' , AT 6,9,"IL 

PAUT PEPARTIR A LA RECMCRCmE D' 
UNE CLE DU TOMBERU. . .'■ : PAUSE 89 

339 GO TO 3190 

359 CLS PRINT PT 5,1, "IL NE R 
ESTE PLUS OU'R SOPTIR OE LR PYPR 
MIOE. . .UlUANT. " PAUSE 90; 00 TO 

3109 

383 plot mm, is. orau 15.0 drau 

0,18 orpu -13,3 orau 0,-16: p 
lot mm. 30 let ee-9' for f-0 to 
10 . plot mm.ee,30*ee drau 15,0 
,~2 let ee«ee*1: next f. orau 

,-13: ORPU -19,-13 
36* RETURN 

399 STOP 

301 CLS : PLOT 00,39 DPRU 30,5 



4 79: OPRU ' 



303 IF SCE«1 TMEN CLS . LET £•■ 
' BRRUO .U0U3 A'JEZ PPMEnE LE 

SECRET OE LA MOMIE. .. 

'JOUS SEPEZ CQUUCRT ' OR . . . " : FO 
P F-l TO 09 PRINT EflFl,. BEEP 
.03,RND»3: NEXT F- 00 TO 310 

396 IF CRP.0 THEN RETURN 

319 IF SCE*9 TMEN CLS I PRINT A 
T 19,1, "UOUS N'AUEZ PAS TROUue L 
TRESOR, , . ".AT 13, 1, "- 
"TINE P 

. iif 

409 RESTORE 401: FOR r«USR "b" 
TO USR ■•i' , *7: READ CECI: POKC F, 
CECI NEXT F 

401 DATA 9,9,0,0,3,4,4,4,0.0,9, 
9, 136,64,64,54 

402 GATA 3,3,2,38,33,73,88,168. 
138,126,138,113,8.36,53,43 

493 OATA 89,40,34,15,4,6,9,19,8 
2,40,48,324 ,64,33,33, 160 

49* DATA 10,10,19,10,10,6,37,39 
, 169, 189, 169, 163, 1*9, 32* , 88, 129 

489 INK 5 PRINT AT 16,i8,CMA« 
145iPT 18,17, CMR» 146, RT 19,16, C 
MRt 147;RT 19,17,CMR| 146, RT 30, 
16,CMRi 149, RT 30,17, CMR» 159, AT 

31,13, CMP* 151, RT 31. 17, '.MP* 16 



891 LET FZ-0: LET CET.0; FOR J- 
1 TO 10: BEEP .e08,U*20: LET F I » 
FI.8 FOP 0-SO*FI TO 309-FI STEP 

6 BEEP .092,CET*13 RESTORE 80 
- FOP F-l TO 14 BEEP .901.F: R 



818 LET M3-INT 165536. PEEK 3367 
**23etPEee- 33673*PECK 236731/30 

CLS ; PRINT RT 3 , 9, "BPRVO. . ■ UOU 
S RUEZ PEU3SI.. .".PT 4,9,'AUEC " 
.10900-IINT (H2-MDI,- POINTS." 

PRINT AT 6,0,'UOULEZ UOUS REFAI 
RE UNE PARTIEV- INPUT "1,U«: 

" -^EN ru- 



331 00 SUB 396 IF TJ."0" TMEN 
LET MM.89 INK 7 OO TO 333 

aaa if t«.-d-' tmem let mh-iss 

INK 7 

333 PLOT mm. 18 ORRU 18,0 ORPU 
0,18 OPAU -18,0 ORPU 9,-18: P 

LOT MM. 39 LET EE-0 FOP F.0 TQ 

19 ; PLOT MM*CE,39*EE DPRU -IB, 

9.-3- LET r.CEE.1 NEXT F PLOT 

MM. 19, 49 ORPU 15.0 ORAU -19,-1 

plot MHt38,40 dpru 0,-13 dp 



Pu 



- 1a 



339 



-138 



334-iF . 
O SUB 363 90 

338 IF MM-138 TMEN LET MM-80 
SUB 380 SO TO 330 

330 PPUSE 200 CLS PRINT PT 5 
,10," ET DEDANS..." PRUSE 70 C 

331 IF FF-1 RNO SA-0 TMEN LET 
R-l LET SCE-0 PRINT RT 8,3, 
MELASi'LE •TRCSOR' SE TPOUuE 
DANS L'AUTRE COFFRE. . .'■; PT 8,3,"' 
CT LA CLE SC TPOUME 8L0OUEE 
OANS Le COFFRE. . . " , RT 11,3. IL N 

e pcste plus our repartir a lp 

PECMEACME D'UNE autre CLE", at 1 
4,14,"..." PRUSE 290 00 TO 336 

333 IF FF-2 OR SP-1 TMEN POPCA 
INK 6 FLPSM 1 CLS PLOT 11 
9,30 DPRU 7,69 DRAU -1,29 DPP 
U -3,18; ORPU 38,-11,-4 ORPU 3, 
-1,-J DRPU -39,11,4 LET SCE-1 

233 DPRU 3, -IS; ORPU 1,-39; ORP 
U -5,-80 

a34 PPUSE 389 RESTORE 338 FOR 



BEEP 1,1: STOP 
613 06 TO 819 
1199 LET PIE-1: L 

3999 



ET MT-0 00 5U0 



L?T 



-IP-1 

1193 00 SUB 7938: SO SUB 7030 

SUB 7030 

1103 00 SU6 4300: 00 SUB 4448. 

1110 00 SUB 9306 

1139 80 SUB 3993 

■■" TMEN 00 TO 1400 

" 1200 

OP INT 

-1I0E7;": PRUSE ~60 "OO 3U8~300 

1134 IF 4tO"C" RND flt<>"U" PNO 
Pt<>"5" TMEN 00 TO 1130 

1136 GO SUB 7130 RETURN 
1139 SO SUB 7 130 RETURN 

1135 SO SUB 7140 RETURN 

11*0 PRINT PT 29,9, DE5S0US UNE 
TPAPPE." LET TRRP-1 RETURN 
11*5 SO SUB 7180 RETURN 

1136 GO SUB 7191 



. 80 SUL -. 

1121 IF »»."U" TMEN 00 TO 141 
1123 IF •t-"C" TMEN 00 TO 13< 
1133 I» A|--S" TMEN CLS . PB 
PT 10, 1, "fl.K . . ue SORT DE LP I 



•an. 



1393 SO SUB 7038: 00 SuB 7939 
SUB 793S 

1398 80 SUB 9386 
1329 SO SUB 9996: 
1331 IF R|-"U" TMEN 00 TO UOi 



1233 IF RJ.'N' TMEN 00 TO 3999 

1333 IF Rj."e" TMEN 30 TO 1390 

1334 IF fljlff AND R|0"U" PNI 
Ago"N" TMEN GO TO 1339 
1100 LET PIEO LET MT-0 



uri 



Lrr 



RND 

oo sue 

9090 

1301 LET PMU-0: LET CLE'. 
01-9 LET TPRP-i LET COF-1: 

TAP-0 

1393 80 SUB 4448 80 SuB 4464 8 
SUB 7038 
1310 00 SUB 3299 

1320 80 SUB -'---. 

1321 IF A|-"U" THEN GO TO 1290 
1323 IF fli'-'U" TMEN SO TO 1339 
1338 IF N3-1 Then 00 SUB 7100 R 
ETuRN 

1336 SO SUB 7120 RETURN 

1400 LET MT.0 LET PIE-4 00 SUB 
8000 

1401 LET TRPP-1 LET CLE-0 LET 
RMU-0 LET BOI-0 LET COF-0 LET 

TBP.a 
1403 SO SUB 7033 00 SUB 7930 
SUB 7038 00 SUB 4454 
1410 80 TO 8306 
1439 SO SUB 9998 IF A|-"E" THEN 

00 TO 1109 
1421 IF P«-'E" THEN SO TO 1430 
1438 IF P«."U" TMEN SO TO 1890 

1433 IF A»-'fl" TMCN SO TO 1899 

1434 IF At<,"E" AND A|o"U" ANO 
Atrf'N" TMEN 00 TO 1*30 

1309 LET MT-9 LET PIE»8; 00 SUB 
9900- LET CLE-0 LET TRAP-1: LE 
T COF-9: LCT TPP-9 LET BOI-1 
1693 80 SUB 4438: 00 SUB 4434 S 



SUB 7938; CO SUB 7839 GO SUB 

7935 

1319 GO SUB 8336 

ISaO GO SUB 9993 IF Ai.'E TMEN 

80 TO 1400 
1831 IF Rt«"'U ' TMEN 00 TO 1600 
1533 IT R|-"N" TMEN OQ TO 1700 
1334 IF A*()"E" PND HJo'-U" RND 



P|<>"N" TMEN 00 TO 1338 
1535 GO SUB 7300 00 SuB 



.._ 8303 
609 LET MT.0 LET CLE-0: LET PI 
■ 00 SUB 6000 LET TPRP« _ 
LET C0F»" 



T TAPi 

SUB 7939 
1693 GO SuB 4434: 
1606 80 SUB 4100 
1619 GO SUD 0303 
1639 GO SUB 9993 
SO TO 151" 



LET 601-0 



GO SUB 4399 



Rf'E" TMEN 



1630 



1631 IF P«o"E" T 

1649 80 SUB 639« 
1630 GO SUB 7151 
1700 LET MT-0; LET PIE-7 GO SUB 

8000; LET AMU-9 LET TRRP»1 LE 
T CLE-0: LET TAP-1: LET COF-1- L 
ET 601-0. 00 SUB 7030 00 SUB 79 
30 GO SUB 4448: 00 SUB 4309: GO 

SUB 4434 
1719 GO SUB 9203 

1730 GO SUB 9993- IF Rfo"S" RND 
RiO"E" TMEN QO TO 1730! 

1731 ZF Af-"E" TMEN GO TO 1809 
1733 IF Af-'-S" TMEN 00 TO 1500 
17a6 IF NS.l TMEN GO SUB 7190 R 
*TUPN 

1740 PAZNT RT 39,9, "SOUS LE TAPI 
S.UNE CLE": PRUSE 190 LBT CLE-1 

RETURN 
1800 LET MT.0: LET l*p-l LET CO 
(■1. LET Pi«-8; 00 SUB 8000: LET 
trap-0: LET »»u-3 LET bOl-0: L 
ET CL«-0 

1891 GO SU6 7035: SO SUB 7935: S 
SUB 7030 GO SUB 7939 
1803 GO 3U8 4399 00 SUB 4448: 
1810 GO SUB 0233 

ieao so sus 9995 

1831 ZF Rt<>"E" RNO P«o"U" PNO 
fllo"3" RND Pto"N" THEN 80 TO 1 
830 

162a IF flf-"E" TMEN GO TO 1990 
1833 IF Ai."U" TMEN 00 TO 1700 
1634 IF fii-"S" TMEN 00 TO 1*99 
1628 IF Rt-"N" TMEN 00 TO 3400 
1640 IF Nl-1 TMEN PRINT RT 30,0, 
"SOUS LE TRPIS.UNE", AT 21,0; "TRP 
PPE.'" LET TRRP-l PRUSE 60 PET 
URN 

1841 00 SUB 6890: RETURN 
1900 LET MT.0; LET Pie-9 00 SUB 
8000 LET 80L1 LET TPRP-1 LE 
T COF-8 LET AMU-0: LET CLE-0 L 
ET TRP-0: 

1905 80 SUB 7033 00 SUB 7033 : G 
SUB 7030 00 SUB 4430 00 SUB 
4454 

1910 00 SUB 9203 

1929 00 SUB 3993: 

1931 ZF AS<>"U" RNO A|()"N" RNO 

P*(J"E" TMEN GO TO 1930 

1923 IF A»-"E" TMEN 00 TO 2900 

1933 ZF pjV'U" TMEN 00 TO 1600 

1934 IF Pf-'-N" THEN 00 TO 3399 
1938 IF Nl-1 TMEN PRINT RT 89,9, 
"ORNS LP BOZTe," PRINT PT 31,0; 
"IL Y P UNE RtlULETTei": LCT AMU- 
V PRUSE 109: RETURN 

1938 IF N1.3 TMEN PRINT AT 30,0, 

"0PN3 LP BOITE." PRINT RT ai,9 

"IL N'Y A RIEN." PAUSE 100 *" 

URN 

3000 LET MT.0 

8 8000 LET TPAP.0 LET BO I ■ . 

ET RMU.0: LET CLE-0 LET COF .« 

LCT TPP»0: 

3093 00 SUB 7033: 00 SUB 7030 

SUB 7030; GO SUB 4430 

3010 SO SUB 3396 

3030 00 SUB 9993 IF R|<>"S" RND 



RET 
00 su 



i-3i' 



AW : 



TMEN 00 ■ 



" TMEN 00 TO 3109 
" TMEN 00 TO 1900 
" TMEN GO TO 1309 
TMEN 80 SUB 7300 I 



IF HI 

_- IF Ai 

2033 IF f.i 

3038 IF Ni 

CTUPN 

3036 PRINT RT 39, 9, "XL N'Y fl RIE 

N DEDANS"- PAUSE 89 RETURN 

3199 LET MT-0 LET PIE-11; 80 SU 

B 8090 LET TRAP.0: LET 801*0 L 

ET PMU-9; LET CLE-0 LET COF-1: 

LET TPP-9; 

3191 SO SUB 7039: 00 SUB 7038 

2103 00 SUB 44*6 

2113 00 EH 8306 

3139 SO SUB 9998 

3131 IF fll.-U" TMEN CO TO 3090 

3133 IF Ai."B" TMEN CL8 PRINT 

AT 19, I, "O.K. .UE SORT OE LP PYPR 

MIOE..,'' PAUSE 69 00 SUB 390 

3399 LET MT-9. LET Ple-13: 00 SU 

9 8999: LET TRPP-1: LET TPP-9; L 

ET AMU. 9: LET B0L9 LET CLE-0: 

LET COF-0: 00 SUB 7938 00 SUB 7 

033 

3304 80 SUB 4484 

3310 SO SUB 6296 

3339 00 SUB 9993 IF Ajo'u" ANO 

Pf <>"N" TMEN GO TO 3339 
3331 IF Rf.'U" TMEN SO TO 3390 
2333 IF Ai-"N" TMEN 00 TO 3600 

3399 LET PIE-13 LET MT«0: GO 3U 
B 8009 LET TPAP.0: LET AMU-0: L 
CT 801.0 LET CLE-0 LET COF-1: 
LET TPP-9 00 SUB 7035 00 SUB 7 
030 00 SUB 7030 

3304 SO SUB 4448 
3310 00 SUB 9396 
2330 QO SUB 9998: V P|<>"U" RNO 

R«o"E" RND P«<>'5" TMEN 00 TO 
3330 

3331 IF At-"U" TMEN 00 TO 3400 
2323 IF Rj.-e- TMeN SO TQ 2204 
2333 IF Rt.'S' TMeN 00 TO 1900 

3400 LBT MT-0 LET PIE-14 00 SU 
B 8000 LET TRAP.0, LET B01«l L 
ET TAP.! LET CLE.0. LET AMU«0. 
LET COF-9 00 SUB 7935 SO SUB 7 
030 GO SUB 7039 

2404 SO SUB 4439 
3419 00 SUB 8396 
439 00 SUB 9996 IF AH.'U* R£ 
"-" PNO A«<."S" TmEn 80 TC 



4 39 



TMEN 00 " 
GO TO 3390 



3431 IF R»."E" THEN SO TO 2300 
2*23 IF Ai.'U" TMEM GO TO 2800 
2*23 IF AJ.'S" TMEN GO TO 18*0 
2*33 PRirrf PT 30,0, "IL N'V R RIE 
II C-CCANS" PAUSE 89 RETURN 
3399 LCT Pie-16 LET MT-0 00 SU 
6 8000 SO SUB 7038 LET TAP.l 
LCT COF.l LCT BOI-9 LET AMU-0 
LET CLE.0 LET TRPP.0 00 SUB 7 

3505 GO SUB *446 CO SU6 4389 

3310 CO SUB 9206 

3^20 GO SU6 999* IF P|<»''E" AND 
— ■■ 00 TO 3830 

TMEN 00 TO 3409 
TMEN CLS._ PRINT 



Af < >"U' 
-53l IF -.. 
2833 IF Rt< 
PT 10,1,"O. 
AMIDE. . .": 



K. . ,JE L 
PPUSE 60 



2340 PPITJT AT 30,0, "IL Y A UNE T 
rcrPC 1 PAUSE 109 LET TRPP.l 

RETURN 

2699 LET PIE" IS GO SUB 8990: LE 
T TRAP-l LET 801.0 LET COF.0 
LET TRP.0 

2601 80 SUB 4454 CO Su8 7923 S 

SUB 7939 

2819 CO SUB 9299 

2629 00 SUB 9995: IF Rf-"N" TMEN 

80 TO 3990 
2621 IF A|."E" TMEN SO TO 3790 
3633 IF A(<>"E" AND P«o"N" TMEN 

SO TO 3620 

2700 LET PIE-17 GO SUB 8090 LE 
T TPRP.0 LET BOI-1- LET COF.l: 
LET TRP.0 

2701 GO SUB 7033 00 SU8 7030 C 
O SUS 4430 GO SUB 4449 

2710 go sub eaoe 

2720 GO SUB 9998: IF Pt-"E" TmEn 

GO TO 2800 
3731 IF Af.'U" TMEN 00 TO 3609 
3733 IF R»0"C" RND A|0"U" TMEN 

so to a72e 

3730 LET OU-INT IRND»3)»1; IF DU 

.1 TMEN PRZNT RT 30,0; "DANS LE C 
OFFRE,IL Y R",AT 31,0,"3 BOUOICS 

.": PRUSE 99: PRINT RT 29,0,"... 
JE LES PRENDS... ": PRINT RT 2l 

.0, '" ": PPUSE 90 

LET JP.JflO: RETURN 

2731 IF 0U«2 TMEN PRINT RT 20.0, 
"IL N'Y R RIEN OANS " ; AT 31,0, "C 
E COFFRE. : PAUSE 70: RETURN 
3738 IF Nl»l TMCN SO SUB 7300. R 
ETURN 
2736 IF Nl-a TMEN PRINT RT 30,0, 

'IL Y R UNE CLE." PPUSE 79- LET 
CLE-1 BETUPN 
3B09 LET PIE-18: 00 SUB 8099: LE 
T TPRP.9 LET 801-0: LET COF-1; 
LET TAP-1 

3801 GO SUS 7Q38. CO SUB 7030 C 
O SUB 4448 SO SUB 4399 
2819 CD SUB 8206 
2838 GO SUB 9993 IF A|."U" TMEN 

80 TO 3709 
2831 IF ««-"S" TMEN 00 TO 2309 
3833 IF ASO"U" ANO Al<>"3" TMEN 

CO TO 232a 
3649 IF Nl-1 TMEN PAINT RT 29,9, 
"SOUS LE TRPIS,UNE",RT ai,0;"TPP 
PPE." LET TRPP.l PAUSE 80 RET 
URN 

3841 IF N1.2 TMEN CO SUB 8599 R 
ETURN 

2900 LET PIE-19 00 SUB 8000 LE 
T TRAP.0: LET BOI-1: LET COF-1 
LET TRP-0 

2901 CO SUB 7035: 00 SUB 7035 
SUB 4449 00 SUB 4439 

29ie so sue 5200 

2929 00 SUB 9995. IF flt-"U" TMEN 

GO TO 3999 
a9al IF A#-"N" TMEN CO TO 3190 
2933 IF A4<>"N" RND Rto'U" THEN 

CO TO 3939 
3938 IF Nl-1 TMEN 00 SUB 7300 R 
ETURN 

3936 IF N1.3 TMEN PPINT RT 29,9, 
"IL N'Y P RIEN..." PAUSE 89; RE 

3900 LET PIE-30 GO SUB 0900 LE 

T TRAP-1 LET 801-0 LET COF-0 

LET TPP-1 

3001 CO SUB 7030 00 SUB 7030 G 

SUB 4300 80 SUB 4454 

3019 00 SUB 8306 

3039 60 SUB 9995 IF P|-"S" TMEN 

CO TO 2400 
3021 IF A«-"E" TMC" SO TO 2090 
3028 IF fl«->"E" PNO P*.<>"S" TMEN 

CO TO 3929 
39*0 IF Nl-1 TMEN PRINT PT 39,9, 

SOUS LE 

. . . " LET 

3941 IF "U-2 TMEN 00 SUB 6300 P 
ETUPN 

3100 LET PIE-31 GO SUS 8000 LE 
T TRAP-1 LET BOI.l: LET COF.l 
LET TAP-1 

3101 SO SUB 7030: 00 SUB 4448: 
SUB 4464: 80 SUB 4430: 00 SUB 
4399 

3119 80 SUB 3396 

3139 00 SUB 9995: IF P«-"S" TMEN 

00 TO 3990 
3121 IF R«o"3" TMEN 00 TO 3120 
3138 IF Nl-1 TMEN 80 SUB 7390: R 
ETURN 

3138 IF Nl-2 TMCN PPINT RT 20,0, 
'IL N'Y fl PIEN..." PPUSE 89: RE 
TURN 

3149 IF Nl-1 TMEN PPINT AT 30,9. 
"SOUS LE TAPIS, UNe*, RT 21,0, "AMU 
LETTE.". LET AMU-1 PPUSE 80: RE 
TURN 

3141 80 SU8 6809: RETURN 
3391 LET PIE"33: 00 SUB 8900 LE 
T TRflP.l LET 601-1. LET COF-l 
3303 OO SUB 7939 00 SUB 7933 

CO SUB 4448 80 SUB 4*34 OO SU 
B 4439 

3319 80 SUB 8396 
3329 GO SUB 9995 IF Af'C" THEN 

GO TO 3810 
3231 IF P«-"N" TMeN GO TO 3400 
3333 SO SUB 7300 RETURN 
3340 STOP 

3301 LET PZE-33 00 SUB 8000: LE 
T TRAP.0 LET BOI-1: LET COF-l 
LET TAP.l 

3303 00 SU8 7036 80 SUB 7038 
CO SUB 4446 CO SUB 4430- CO SUB 

4 399 

3319 00 TO 0396 

3320 GO SUB 9993 IF flf«"U" TMEN 
00 TO 3610 

3331 IF R4."N" TMCN r.ij TO 3800 
3333 PRINT AT 89,0, "OANS LA BOIT 
C",RT 31,0," RIEN.." PAuSe 80 

RETURN 
3349 LET JA.JA»3 PRINT PT 80,0, 
"SOUS LE TAPIS, ', AT 31,0, "3 BOUO 
IES I" BEEP .1,7 PPUSe 60 PR I 
NT RT 30,0, 'ue LES PRENOS , " i RT 
31,9,"flIEN 3URI-" RETURN 
34*1 LET Pie. 34 SO SUB 8000 LE 
T TRAP.l LET BOI-0 LET C0F.9 

3*02 So'suB 7030 00 SUB 7828 8 

SUB 7020 GO SU8 *43* 00 SUB 

4 309 

34 19 SO TO 8206 

3430 CO SUB 9995 IF fi»."N" TmEN 

80 TO 3900 
3*21 IF A».'E" TMEN GO TO 3810 
3422 IF Af.-'S" TMEN 80 TO 3200 
3440 POINT AT 20,0, "IL N'Y A RIE 
N".AT 21,0, SOUS LE TAPIS." PAU 
SB 80 RETURN 

3301 LeT pie. 23 oo sue eooo le 

T TAAP.9 LET BOI-1 LET COF-1 

3302 00 SUB 7033 00 SUB 7023 8 
O SUB 7020 00 SUB 4440 00 SUB 
4430 

3510 GO TO 0306 
-"10 SO SUB I 

. TO I7M 



3331 IF At-'S" TMEN SO To 3399 
3533 IF A*, u TMEN GO TO 3919 
3535 PRINT AT 20,9, OAnS LA 80IT 
E,",RT 21,0 ' U"E AMULeTTE. .." P 
RUSE 00 RETURN 

3601 LET PIE.26 GO SU8 8090 LE 
T TPRP.l LET TAP.l LET 801-0 
LET COF.0. 

3602 CO SUB 7030 80 SUB 7929 
SUB 4434 CO SUB *3*0 

3819 GO TO 8205 

3639 GO SUB 9945 IF At- * TXCN 
CO TO 3400 

3821 IF Af E TMEN CO TO 3818 

3640 00 SUB 6300 RETURN 

3701 LET PIC-27 GO SUB 6090 Le 
T TRAP.l LET TAP-i LET BOI-0 
LET COF-0 

3702 CO SUB 7030 SO SUB 7835 C 
SUB 4454 CO SUB 4300 

3710 GO TO 9306 

3739 CO SUB 9995 IF At«"S" TmEN 

CO TO 3500 
3?al IF fit.'U' TMEN CO TO 3818 
37*0 PRINT AT 20,0, IL Y A 2 SOU 
GIE5." BEEP .3.* PAUSE *5 PR 
INT AT 20.0. "JE LES PRENDS. 

LET Jfl.JA.3 PAUSE 33 RETURN 
3601 PLOT 0,0 CLS PRINT RT 10 
,4, 'JE UOIS UN eSCRLIER.. 6EEP 

.3.6 PAUSE 33 PRINT AT 13,4. 
JE DESCENDS.." SEER .9,4 6ECP 
.8.13 BEEP .6,17 PAUSE 80 CLS 



3603 6aAU 237.0 PLOT 2* , 10 DPA 
U 16,14- DRAW 175.0 ORPU 16.-1* 
: PLOT 50.24 ORAU 13,11 
3934 ORAu 126,0 DRAu 13,-11 
3603 PLOT 72,36 DRAU 18,7 OPAU 
89,0 DRPU 10,-7 PLOT 90,44 O 
ARU 7,4* DRAU 59.0 ORAU 7,-4 P 
PINT Bl, "«»»*., .voultl voul ton! 
inutr ">'■ BEEP .3,21 BEEP .3.33 

3806 PAUSE IF INKEVt.'N" TMEN 
CLS BEEP .6,-7 BEEP .9,-9 P 

RINT INK 3. AT iO.S.'UOUS L AUREZ 
UOULU..." PPINT PRINT PRIN 
T " LR LACMETE NE PAIE PAS... 

3807 CLS PRINT AT 10, 18, "O.K.. 
. ,< COn 1 1 nut" . BEEP .4, 10 BECP 
.4,10 PAUSE 100 CLS PLOT 0,1 
DRPU 235,9 PLOT 100,19 ORAU 

0.100 OPAU 69.9 ORAU 9.-190 
CIRCLE 130.69,4 

3806 PPINT 01, "un* POrtt...j« I" 
Ovvrt." BEEP .07,3 BEEP .98.5 

PAUSE 80 CLS 
3899 PRINT AT 10,1, "H V » W CO 

moi r . . . , . i* prtttn 

tt ttlon et pun <vu« ot n»vt 
.1" BEEP .8,10 PPUSE 130 REM 
LE COULOIR 

3810 CLS PLOT 65.0 DPRU 0,173 
ORRU 85.0 PLOT 178.0 ORAU O. 

178 

3811 PLOT 86,25 OPAU 2,0 DRAU 
0,30 DRRU -3.0 PLOT 68,75 DPP 
U 2,0: DPRU 0,30 ORAU -3,0' PLO 
T 66,126 DRAU 2,0 DPRU 0,29 D 
RAU -3,0 

3813 PLOT 169,28: DRRU -2,0 ORR 
U 0,20 DRAU 2,0: PLOT 169,75 
RAU -3,0 ORAU 0,30 DPRU 3,0 P 
LOT 169,128: DPRU -2,0. DRAU 0,2 
DPAU 2,0: 

3B13 INK 2 PRINT PT 17,9, "1". AT 
11,9, "3", AT 5,9; "3" , AT 17,33, "3 
",PT 11,33, "4", AT 8,32, "6" INK 



3615 INPUT Bl,"OUeLLE PORTE OOIS 

-JE OUURIAT', Ot 

3816 IF Ot-"l" TMEN CLS : 00 TO 

3200 

361? IF Ot-"3" TMEN CLS 00 TO 

3390 

361B IF 0t-"3* TMEN CLS . 00 TO 

3400 

3819 IF 0»-"4" TMEN CLS CO TO 

3309 

3630 IF 9t-"S" TMEN CLS 00 TO 

3800 

3621 IF 8»-"6" TMEN CLS . 00 TO 
3700 

3622 IF 0*->"r AND 0|c>"2" ANO 
Ot«>"3" AND 0|<)"4' AND Qt<>"6" 
RND 0i<>"6" TMEN CO TO 36l5 
3689 CLS ■ PRINT PPINT PRINT 

PRINT PRINT " LR 80UCIE C 

'EST ETEINTE... PRZNT PRINT 

LP PROCMRINE POIS.PENSEZ A t 

H PReNDOC ONE AUTRE A'JANT OU'IL 

NE SOIT TROP TRRD..." PRINT " 
DANS LE NOIR ,JE SUIS TOMBE 
DANS UNE DES NOMBREUSeS OUBLIET- 
TES OE LA PYRRMIOE..." PAUSE 59 
CLS : CO TO 4750 

36B2 CLS PRINT PRINT PRINT 
PPINT "LA BOUGie C'CST ETEINT 
E.ET IL N'eN PESTAIT PLUS ." 
PRINT PRINT "OANS LE NOIR JE 3 
UIS TOMBE DANS UNE DES NOMF.RCuSe 
3 OUBLIETTES DE LA PYPAMIOE... 
" PRUSE 390 SO TO 4730 
3060 ReSTORE 3863 FOR F-l TO 33 

READ A, 8 BeEP fl,B: NEXT F 
3963 OATA . 8, , . 3 , 5, .3, 3 , .5 , B, . 3 
5,7, .25.9, .23.7, .3,9, .33,9. .35.9 
, .36.8, .5. 9 

3863 DATA . 25, 9 , .25, 7 , . 8 , 6 . . 38, 7 
,.35, 9.. 5. 9,. 33, 7,. 35. 9,. 5. 9,. 5. 
5, .8.7 

3864 RETURN 

3902 PRINT ' D*n» (tilt ^ri»Ht, 
lt» COI'rtl (On* rlfrillni.il tin 
>i "i QO SUO 4*48 PRINT AT 31,9 
."tppuvtz tor <ENTER)'- PAUSE 9 
Cls print -it* boiitt tont ft 
prtttntttt tmii ": 00 SUB 44 

39 PRINT AT 3 1 , 0, "tpPuVt I ■'" ( 
ENTER)" PPUSe 9 

3994 LET 30-0 CLS PRZNT ' itt 
ttpit toil rtprtttntt* tin*." s 

SUB 4390 PRINT AT 21,0,'tPPUV 
*l »ur 'ENTER. ' PRUSE 9 CLS 

PRINT "Ltt trtPPti tont rtprtttn 

tilt tint) ": GO SUB 443* PR I 
NT AT 21,0, "tPPUVtl tur <ENTER>" 
: PAUSE 9 CLS 
3O06 PRINT PRINT PRINT PR! 

NT "pour it rttit.vou* ttvrtz vo 
gt dtbfooi lltr . . .■• PRINT AT 31 
,0."tPPUVtr tvr .ENTER." PAUSE 
RCTUPN 

3940 PRINT AT 17,32. INK Bi "< I •" 
,AT 17,28, "t»V" INK 6 RETURN 
3934 PPINt AT 8,28," ".PT 5,3 
8, " ",PT 6,28, " ",PT 7,38, 
" FOR F.l TO P PLOT 240,1 
00. F OPRU 7,0 NEXT F 

3985 PLOT 344,P+191- PLOT 343. p 
*103 PLOT 342, P. 103 PLOT 342, R 
.194 PLOT 343. P. 193 PLOT 3*3, P 
.196 PLOT 344, P. 107 PLOT 343. P 
.196 PLOT 346.P.103 PLOT 346, P 
.104 PLOT 246, P. 196 PLOT 345 , P 
.103 

3986 RETURN 

Suite page 5 
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Les KARBS et les SMURFS sont des etres intelligenls 
qui pour survivre et se reproduire consomment du 
Xenon, gaz rare. Le Xenon est delivre par le Grand 
Maitre Ordinateur qui le distribue aux rois a la suite de 
luttes psychologiques intenses. 

Le but du jeu est de developper sa tribu au detriment 
de celle de lautre. Le roi vainqueur est celui qui gou- 
verne la tribu la plus nombreuse au bout d'un certain 
nombre de period es. 

Francois THELLIER 

Mode d'emptoi: 

a)Au debut de la partie. les rots se concertenl pour fixer le nombre 
de periodes (en general entre 10 el 15). Chaque tribu comporte 
10 mdividus et compte un stock de Xenon de 20 unites. 

b)Chaque periode se decompose en 3 phases: 



1ere phase: COMBAT PSYCHOLOGIOUE pour gagner du Xenon. 
Trois tables conditionnelles sont affichees sur lecran, elles corres- 
pondent aux situations suivantes: 
-Population de SMURFS > population de KARBS. 
-Population de SMURFS - population de KARBS. 
-Population de SMURFS < population de KARBS. 
(K - KARBS et S = SMURFS) 

Mode d'emploi des lables conditionnelles; chacun des rois choisit 
sans que I'aulre le sache, un nombre. 1 ou 2. Le roi des SMURFS 
|oue le premier, son choix s'affiche momentanemenl sous forme de 
X sur lecran. Lorsque le roi des KARBS, a son tour a choisi, les 
valeurs reelles de leurs choix respeclits apparaissent sur lecran. 
Les rois peuvenl evidemment se mettre d'accord avant de miser, 
mais attention au bluft ou au manque de confiance. 
La quantite de Xenon delivree a chaque roi est alors egale au pro- 
duit: nombre d'individus x coefficient de la table correspondent au 
choix des rois. Par exemple, supposons qu'au cours dune partie on 
ait: 

nombre de SMURF: 40. choix du roi des SMURF: 1, 
nombre de KARBS; 35. Choix du roi des KARBS: 1. 
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En lisan! la table condiltonnelle correspondante fla population de 
SMURFS > population de KARBS), la case 1.1 donne comme coef- 
ficients: 25 pour les KARBS et 15 pour les SMURFS Les nombfes 
d'unites de Xenon dehvres sont alors de 25 x 35 ■ B75 pour les 
KARBS et de 15 x 40 - 600 pour les SMURFS. 
2eme phase. CONSOMMATION COURANTE: 
Chaque KARB et chaque SMURF doit pour sa survie. consommer 1 
unite de Xenon. Au cas ou il n'y aurait pas assez de Xenon, les 
individus en surnombre meurent. 
3eme phase: REPRODUCTION; 

Deux individus de la meme tribu peuvent donner naissance a un 
troisieme. cette naissance consomme 40 unites de Xenon. On ne 
peut evidemment pas consommer plus de Xenon qu'il n'y en a dans 
le stock et il ne peut pas y avoir plus de naissances qu'il n'y a de 
couples. 

Ces trois phases: COMBAT PSYCHOLOGIOUE. CONSOMMATION 
COURANTE et REPRODUCTION, constituent une periode. 
c)Toute intimidation ou manipulation psychologique de 1'adversaire 

est recommandee. Trop de confiance ou pas assez peuvent vous 

faire perdre. 



832 PRINT AT 19, li, -WflLlOCZ "Jl ■■ 
.RT 29,1*, "OU RNNULCZ 1A>"»" 
849 INPUT U« 

652 IF U»<> V AND Ut<>*A" TrttN 
SOTO 6*3 
669 IF Ut-"U" THEN GOTO 918 

07« print rt ia.aa.u-zt. <vr ia. a 
a aea B PRiNT rt i*.ae.u,z«.RT i*.a 
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RINT AT 19,1* 
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35 PRINT ■ 

3* PRINT " 

37 PAINT " 

38 PRINT 
99 LET Z«- 



53TTTT 



1ft! 



UIUTS. 
M0RTS: 



laa rem 

IIS DIM M(»,3.B) 

laa DIM - 13,2) 

:3a LET DI«"aS351£15331S3533152 

aiaeeisioa30saa3 5i533asieaBiS" 

143 FOR 1-1 TO 6 

153 FOR J-l TO 3 

16a FOR K-1 TO 3 

179 LET L.**I*S»J*K-6 

175 LET L.L«2-1 

133 LET M<I,J,K> -UAL DHL TO L + 
1) 

190 NEXT K 

aee next j 
aia next i 

223 REM 

aas 5CSL6 siaa 

338 FDR J-l TO 2 

a*a let a (i, ji -10 

250 LET R[2,J) »« 

268 LET R 13, J) -30 

378 NEXT J 

37S C0SU8 3300 

280 OBINT AT 10,14, -NBRE PERIOD 
ES? 

390 INPUT P 

308 REM 

318 REM 

320 REM 

330 FOR L-3. TO P 

- "I print at 13 , 1*. _, "HHmH 



....INKEYl 
370 IF CODE AI-29 OR CODE ftnJ 
TMEN QOTO 488 
363 G03U3 2030 
2ZZ :QTO 355 

400 PRINT RT 17,30, "X" 

401 FOB I»l TO 39 
■iS2 NEXT I 

418 PRINT RT 18,23, ■'KRR87" 

415 IF INKEYt-"" TMEN GOTO 4 15 

423 LET BI-INKEYJ 

430 IF CODE BI-26 

THEN GOTO 460 

4*0 G05U8 3300 

450 GOTO *15 

*60 PRINT RT 16, 38, B«. AT 



OR CODE 81-30 



39, 



TO 50 



350 t 



'HINT RT 17,14, "PMRSE1. SMU 
355 IF INKEYf."" TMEN GOTO 358 



461 FOR F-: 

462 NEXT f 
470 IF a 11 -a) >R II . 

**80 IF Btl.a) -RU, 

*490 IP R U, 2> tflil. 

see for j-i to a 

518 LET HI3.J1 .R13.J) *R 
I*3t(J.2i .URL Bs.UAL All 
S20 NEXT J 
535 G05U8 2103 
538 G0SU8 2200 
540 REM 
858 REM 
568 REM 
578 PRINT AT 17,1*,'PMA 



TMEN LET : 
TMEN LET 
TMEN LET 



16, 14; "CONSOMMATION XENON" 

360 FOR J-l TO 2 

590 LET X-R II. JI 

609 LET Y-RI3.J) 

610 LET R(l.J) -X* (V >-X! ♦Y*IY«X> 
630 LET a IS, JI -RI2, J) . (X-YI • !Y< 

X) 

630 LET Ri3.J) « (Y-X) • IY > -XI 

6*3 NEXT J 

663 GOSuB 2200 

560 GOSUB 2199 

665 FOR J-l TO 2 

670 IF RIl.JMl TMEN GOTO 970 

675 NEXT J 

sea REM 

690 REM 

790 FOR J-l TO 2 

710 IF J-l TMEN PRINT RT 17,1*. 
"PMASE3. SMURFS." 

730 IF J-2 TMEN PRINT RT 17,14, 
"RMR5E3. KRaBS" 

730 PRINT AT 16,1*, "NSRE NAIS3A 
NCES^" 

748 INPUT 

758 IF 2t0c-C'l,J! AND *0tO(-Ri 
3, J) TMEN GOTO 780 

768 GOSUB 2989 



GOTO 74 

•' 1(1.0) »B 

:'3 J) -*9t0 

.«(J-a> 

iT 12,39*U,Z».RT 13,2 

aae'VaiNT rt i*.29«u; zi;«t i*,a 



7 90 LET X 
888 LET U 
810 PP INT 
0*U, " 



933 LET RC1.J) -I 

«38 LET RC3.J) ■: 

9*3 G0SU8 ai«0 

958 NEXT J 

969 NEXT L 

978 REM FIN 

gee gosub aiea 

985 FOR " 



^96 NEXT I 

1808 GOTO 233 

2008 FOR F-l TO 40 

3810 PaiNT AT 31 , 1*. "MRUWAISE DO 

NNEE" 

aoaa print at ai,i*; B 

5030 NEXT F 

2840 ACTURN 

2100 REM 

3110 FOR F-l TO 5 

3130 PRINT RT 16»F,1*.'* 

3130 NEXT F 
a 1*0 RETURN 

aaaa rem 

3310 FOR F-l TO 3 

aa20 print at n*F,aa, z«. at ii*f 

,20; R(F.l) 

3238 PRINT AT 1 1 4p , 26, Z«, AT 11»F 

,36, RIF.T' 



2a*B NEXT F 

2348 FOR F-l TO 180 

8346 NEXT F 

2358 RETURN 



IDEES 



COMMODORE 64 



Vous etes a court d'idees pour vos jeux? Ne vous in- 
quietez plus! Voici de quoi vous inspirer pour vos futurs 
scenarios.-. 

Laurent BRUERE 

Chaque scenario est construct aleatoirement entre un certain nom- 
bre d'ingredients (moyen de depiacement, de defense, lieu...). Cha- 
cun de ces modeles porte un numero negatif- Si vous voulez recu- 
perer un theme deja vu, donnez le numero de celui-ci. Le niveau de 
complexite (de 1 a 4) permet d'avoir un scenario plus ou moins 
etoffe. 

Enfin. si vous desirez voir plusieurs scenarios, tapez + a la fin de 
I'affichage d'un scenario. 




ERRATUM sur COM.64 



PILULE EMPOISONNEE du n° 

47 

La ligne s'etail perdue dans 

les limbes de I'informatique. 

Voici son sosie: 

DIMA(5.6): DIMD(34): JS = 

\JOUEUR": POKE53280.0: 

POKE53281.0: H{3)= 100: 

H(4)= 1000 



i. WE VsiVi.Z P0VE532SI.Z PPIMT"^»",i;HPIf3y.CHPf:i4, 

3 en-? 

< Dili form-, ,i\%rw, ,cjt<2%/ ,•»%'.£&> ,£t f i%i -fiM'-i&i 

T r&;.;; Til ■-o-j; -CjlEZ PETROUVEH UN ' 3 CEnWI0 THPE2 \ 
0" mjhepo simqh 'peruptt 

6 INPUT "fUKti 

19 [F H=0 THEM ^IKT<I-'-«HD(-TIVieeJ 

ae pem •••• mvEMS ee debipixtion •••• 

30 K*>7 

■W Et'3'-"TrPEP BIR LES V 

50 Et'i/-"ECPS=.EP LE"; ; V'JP LE- l"JP-," 

« Bf<Z>a*IiETRUIR£ l£^ r HVEC yt'E fiPME rS-POILE" 

78 B«'3J-"7ij£P LES 1 AVEC 1 CQiJPS DE FOUPtMETTE" 

Z% £I'4.= '5A<JIEP PAR IiE;='.A ^Ei I " 

90 B»«>-"mTIRK LES T BRHB LE3 HUUB QUE VOUS CPEUSEZ" 
MB W«>-"LftC» 3E LA ff/HPHITE 'iUP LES t " 
1M PErt •••• N0VEH8 EE UXOHDTION •••• 

169 LM-5 

li'j L»'8'-' : EH SOUCO'JPE" 

170 L»<i)-*EN '.'ELO" 
175 L*(2J""EM TRIM"- 
!S0 \-t'.S>'"P. P!ED" 
;d5 UK4>»"EM JEEP- 

290 P.EM •■••*• BUT •••••» 

291 !1»'3--"CrtEPCHEP SOUS LES HftDfiVPES LM CLE PC(UP DELIVPE 
ft LA PAUCesSE SMOULG' 

285 MM-7 

219 MJ(1.--PESIEP EH v|E ijH CEPTBIH TEMPS" 

229 l1t'2^- M PP0TEi3EF L'HVPEP KOP/L DES 1 ET DES 1 " 

239 M*'3.. = -DETPUIPE TO'JS LES T" 

2*9 m^j-'F-POTEGEP .'QTKE ^M I TPOP TEMEPAIRE - 

ZSfl N»<5>«"8T0PE8 la machkie ikfeRHALE" 

260 M*/6'="ATTPfiPEP LE PLUS POSSIBLE DE PXL" 

300 Pen •••«• DIVERS ENNUIS ••••• 

310 £M=19 

;;0 -:i B>-"A ECHftPPER A L' INVINCIBLE T" 

330 E*'l--"ij.| PALeNTISSEt'EtIT 3PEF'' 

MQ Ei(2J«"UN IMLENTlSSEnENT IUS0UE ACTitWi EFPECTUEE" 

I'M Et' 3,."FAUIiE DE MQVEN DE LC'C '',»:■■ j: : -■>■ ,-■' II0M2 £P 

FECTUEE' 

3M Ef'4'-"APP1VEE DE 8UPER t" 

379 El>-5<-"Ull 1 SUPPPISE" 

339 EI'S)»"AiriftnT BVEC ATTFACTIOH rEHRIBLE" 

339 E*t7)«"CHflHG01Drr BRUSOU6 DE DIPECTIOn DES T " 

499 E*<9.>--Pfti«iE POUH PEP«PEF papcouPIP 19 OLOBOL 8flH8 fUER' 

419 £I'9j-"A EFFECTUEP L'ACTIOHl FijijP FEPhPEP VOTRE APHE" 
508 PEM •••»•» ACTION •••»•• 



518 AK-3 

529 AJ<8>' M SE PEIIDPE CHEZ SOI POUP PEPAPEP" 

538 H«a> = "SE PEPOSEP 7 BOHL SANS TIPEP "I BOUOEP" 

549 AI'2j-"DETPUIPE II EHIIEMIS" 

698 PEM »*••• OBSTftCLE/EHHEMIS •«•»• 

619 OM-16 

-S29 Q*f3J»-'ftSPIPRTEUPS" 

639 0*'I" , 'MCPCEP. , J.< DE POM PADIOACTIFS" 

€40 9*'2.'= ■SOUTOLWES VOLAtlTES" 

659 rJt<3)-"00PILLES H 

669 0f(4)-"HELIC0PTEPES'- 

678 gi'5>""Sai.n:is:-e-:." 
€S9 W<«»-■CB^«IBflLE8• 

659 0I'7. '"MISSILES fl TEIE CHERCJCUSE" 
790 C*'9> = "fAtllKAZES- 
710 0K9>--SEPPEHTS- 

729 0»(ieia"DPA00H$ BOULIMIOUES" 

730 Of'll i'"PLAIITES CiMIUVOPES" 

749 0t'12'>"BC"jrElLLES DE NITRO-OLVCERIHE" 

759 0K13J--TUEUPS fl OBOE" 

760 Of 14-.--KBKGOUR0US" 
778 0*'15)-"DINDONS" 

eeo peh ••*«•• decop •••••« 

918 DM- 1 4 

928 D*<9j-"DAUS LA JiJNOLE" 

930 DI'!""DAMS un PETIT LABVPINTHE" 

:?.1A [i!'2'*"P*rl3 pjliE BTftTIOH BAU'EAIPE" 

898 rj!'3'-"30P LA PCHJTE" 

368 DI(4>- ,, fl LA MOHTAGHE" 

679 Df<3)«"DftH8 UHE CSNTMLE 'I'Xi.EAIPE" 
■ i | - 'DftHS '.in HRNOII HAUTE" 

898 0*<7>>"MN8 iJi'E nine DESAFFECTEE" 

599 W«>»-B0US TEPPE- 

918 pi ;• ."DOH3 iJME FETITE VILLE" 

?29 H»'.I9.""SUP un fHftHTIEP" 

;->-> ;.,r ;i i. >DAHS UN PORT" 

?40 ni'l2>-"DA'IS LES EOOIJIT" 

?59 Dl'13'- WINS "Jti EHTREPOT DE DtNHMTS* 

[888 REM DEW1 ' ' ■' 

1091 PRIMT'T h^PHD'H- 

. * A-g TO 5 
1993 E<ft>«B*7 0<fl>"M7 Q(A)"JNT<RMII(1 «W) 

1004 tit T 

1810 IHPUT MGKPLE/ITE . f 

leae if c<i or . i ■-■■ •■ iaio 

. IS K88 B08UB 5599 
1026 fop A-e ro c 



1 GOSUB 5400 

J NEXT A 

j FOP fl-1 TO C 

:■■ GOSUB ^908 GOSUB 5189 

) [FE'H. = E'A-1>0PD'A) = D'A-1>THEII 1049 

3 FOP Z=l TO 93 

) IFMIMCn»(B>,Z,I>"*r , TH£>tHlfS>»Mirj»<l 



r(B), 



.-i.i.ij.pM[i- i ..r ■ ■•ntDi'ni'B) 



1999 IFMIDf'Bi'D'Ai i,Z, l)0"rTWEHlIB8 

1030 BI'D'Ai> = MUJt(Bt'P'A>>. 1 .4-1 (♦OI'O'PHOintSi ■•Mll't' HT"fi ■■."*: "> ' 

1190 IFWDt'E*<£'A^>.Z. 1 ><>" fTHEMl 129 

1119 EfE^A'^MIPr'Et'E'R/'.i.Z-l "Ot'O.pnp' 1 •*•■ > > 'HI CI' EI* E ■ » ■ ' ■ ~* 1 >4fl 

1128 "EXT ~ 

1130 NEXT A 

.^099 REM f»* AFF1CHAGE *•♦ 

2995 PRIMT-n SCENARIO ir "H." COMPLEXITE " .C PRINT PPINT 

?dl9 FPIHT"LE EOT DU JEU SERB DE ".lll'F' 

2013 PPIItT PPIHT'XELA CE PBSSEPA ■ i .D*<D> 

J029 PPIIIT PRINT 

2023 PPIIIT"VOUS VOUS DEPLACEREZ " .LI'PHP' 1 '»LM ' PRINT PRINT 

2938 GET AI !F AIOCHR**: 131THEN2830 

2033 FOP A-l TO C 

2048 PPINT"\'0US POUPREZ ' 

2045 



RINT 



I AUPB PAPFOIS " 
THE! I 286 ' 



EI'E'flf 



2110 

2120 
, yn 
2210 
2220 



■i :-. i .-> 

■ ,,... 

5.119 
3500 
3310 



PPINT-MAI3 IL V 

PRINT 

GET AI IFfil' CHRJ03) 

NEXT A 

H-RHTXi>*f*( 

ppimT"Ai;tiomi ■'.bi<a> 

MINT(RNIK1 -*m> |FINT'Bi-BTHEN2118 

PPINT"flGTI0N2 ".AKB) 

GET Al IF Al'>"-"tHEN -"'..On 

H'O 

GOTO 3 

FF:; ENNUIJ — — 

E'A>-IHT'PHDM '»EM. FETUPil 

FEM moveii DESTRUCTION — 

D'A.-INT<PND<T! >*BI1) PETijFN 

PEM BUT «— 

B»lNT<RHO'I)»HHi RETURN 

rem action ■— - 
ac-int<pnd'l j«ah.' petupii 
pem 0bstacle3/ennem1s — 
g.;a--int'Rnd'1)*om> petupn 
pei1 decop "«" 

D'ltlT'PMp' 1 >*rn ■ PETHPH 




LOGIQUE/CONVERSION trsso 



Un utilrtaire bien pratique pour les conversions de 
base. Attention, mots de 16 bits maximum (c'est a dire 
# FFFF ou 65535). 

Francis TEREYGEOL 



t »:»Em>A.P:POKEA.DrN£):TiF0flt-l5SI4T015578STEP64!PaK£I. 1701 NEXT iFO 

SI">3379T015431STEP-64iPOKEI.149>NEXTiF0RI-OTO35tREADn, D:POK£A.D 

i NEXT !FORI-IS399T015615>POKEI.176t NEXT 

13 FORI-lS679T316233STEP64:POKEI. 191 :NEXT:P0KEt63iq, 143: FDR I -163 

18T016238STEP-HPOKEI. 148:NEXT SPOKE16257. 143:FORI =161 93T015617ST 

EP-B41POEI. 19lJNEXTiFORI-15353TO15570:POKEI. 176=NEKT 

28 PRINT9387. -LISTC DES OPERATIONS I " 13451. "0-0-0-0-0-0-0-0-0-0- 




23 PRINT2342. 
30 P91NTa6B6. ' 
33 PRINT8670. "3> 
4B PRINT3734. ■ 
43 PRINT2798. "5> 
50 PRINT3862. ' 



DECIMAL" I 
DI NOIRE" I 
HEXADECIMAL-: 

BINAIRE": 
HEXADECIMAL" S 
DECIMAL" 



HEXADECIMAL --) 
1 HEXADECIMAL — > 

DECIMAL «•*«•> 

DECIMAL -— > 

BINAIRE ■■■■■■] 

BINAIRE -——) 
33 PRlNia965."INrR0DUISEZ LE MUMERO DE L'OPERATION CM01S 
PUTO 

BO 0NAG0SUB7a.525.36a, 140.SSB. 740. IB 
65 GOTO 10 

79 CLEAR:CLS:PRINTTABll3>:-CONVERStON HEXA — > DECIfWL": PSINTTAB 
<15) (STRING*! 27. 131)1 PRINT: PRINT: PRINT: PRINT: PRINT: PRINT 
75 GOSUBI 153 

88 IFLEN<Z»)>4THENGQSUBl[68£LSE90 
83 OOTQ70 

98 P-LEN<r»>:DOT0110 
93 M-liA*-"0123456789A8CDEF" 

188 FDRX-0TO15:IFf1tD*(A*. X*l. I) OB4THENNEXT 
183 RETURN 

118 B*-MID»<Z». P. l):GOSUB93:A«A.X:P-P-I:IFP=0THENI30£LSE115 
113 W-MIB*1Z*.P, l>!G0SUB95!n»H*i6!B-X-M:P-P-l:IFP=BTHEN13BELSEl 



590. 


IFA4I X)-r08»e"THENV*<X)-"0- \}j 


gg 


IFA»1X)--00B!"TH£NY*{X>»--1 ■ V 


4H 


IFRt<X)-"B0lB-TMENY*r»>-"2- 


405 


IFft«<X)-"8811"THENV»(X}-*3- 


.i : 


IFA»<X)"-0188"THENY»(X>-"4" 




IFA«f X]-=-01Bl"TH£NY*(X)-"3" 


a g .i 


IFA*(X)-"8!1B"TWENY»(X>**"6" 


423 


IfA*(X>--011fTH£NV«<X>»"7" 


.-. n 


IFn,»<X)-"lB00-THENY*(X)«"8" 




lFn«<X)--I08l"THENY»<I)<."9- 


440 


IFO»<X)»"1010-THENV»(X)--fl- 


445 


IFA»f X>="181 1"THENY«CX)-"B" 


450 


IFA»CX>-"110B-THENY»rX)«"C" 


439 


IF«»<X>»"11B1"THENY«<X>-"D- 


46B 


IFO*<X)=*l 1 IB"THENY«CX)«-E" 


465 


I FA» < X ) - " 1 1 1 1 " THENY • < X ) - " F " 


470 


NEXTX 


473 


IFY«(4)*"0-THEN4E0ELSE5I0 




I FY*( 3) *" 0= THEN4E5ELSE5B5 


485 


IFV»<2)=-8-rHEN490eLSE500 


490 


IFY«{1)-"8"TMEN49S 


493 


TT»-Y*(1):G0T0515 


!j«a 


T> ««Y»<2) +Y*< 1 ) :GOT0515 




TT*-Y*<3)*Y*(2)+Y»U):G0T051S 




TT*=Y»(4>+Y«(3)*Y«(2)*Y»(1) 


515 


PRINT:PRINT-====»= VALEUP. EN HEXADECIMAL 



X-1IN-N-1 



■) 



:CLS:PRINTTAB< 



'ICaSU©931f1»M-16-.16:C=K*H:P-P-l:IFP=0THENI30EL 



120 B*-HID4iZ». I 

SE123 

125 B*»nlO«<Z*. P. l>iG0SU83S:n-n>l6>l&*16:D*X*t1 

130 T.A.8*C.D:PRINT:PRINT--— — VALEUR EN DECIMAL "J":' 

135 GOSUB!135:GQTQ70 

140 CLEAS:CLS:PRINTTA8<lS>:"CONVERSION DECIMAL ==) BINAIRE": 

NTTAB<15)JSTRING*(31. 131 ): PRINT: PRINTi PRINT : PRINT!PR1NT:PRIN" 

145 GOSUB150:GOTO335 

150 COSUB11S5 

155 Z*VAL<Z*> 

160 IFZ>6S335THENG0SLIBU68ELSE170 

165 COTOI40 

170 IFZ»-32768THENB«=-l-ELSe8»""e" 

173 IFZ>-3276STHEN180ELSEie5 

180 Z-Z-32768 

183 IF2>«163S4TMENC*~-1"£LSEC»="0":IFZ>-163S4THEN190ELSE195 

190 Z-Z-16384 

195 IFZ)»S192THEND*--l"ELSED*-"0-: 

200 Z-Z-8192 

203 IFZ>-409ETHENE«-"l-ELSEE«--0 

210 Z>Z-4096 

215 IF2>-2048THENF«--1"EL5EF*="0 

220 Z«Z-2048 

225 IFZ)=1024TMENC*»"I"ELSEC»="B 

230 Z«Z-1824 

233 IFZ>"312THENH*-"1"ELS£H*="B" 

240 Z-Z-312 

245 IFZ)-256THENI«--1"ELS£I»-"0":IFZ}-256THEN250ELSE255 

238 Z-Z-236 

255 IFZl=123THENJ»."l-EL5EJ»-' , 0-JIFZ>-128THEN260EL5E265 

260 Z-Z-128 

265 IFZ>-64THENK*-"t"EL5E**=-B-:lFZ>-64THEN27BeLSE275 

270 Z«Z-64 

273 IFZ) -32TWENL*-" 1 "ELSEL*--0" : IFZ> -32THEN28eELS£285 

280 Z-Z-32 

285 1FZ>=16THENN*-"1"EL5£N*."0":IFZ)-16THEN23BEL5E295 

290 Z-Z-I6 

295 IFZ>=8THENft*-"l*ELSEM*-'0-:IFZ>-STHEN300ELSE305 

308 2=2-5 

303 IFZi=4THEN0«--I"ELSE0«-"8" : IFZ) "4THEN3 1 0ELSE3 1 5 



520 GOSUB1I35:GOTO360 

525 CLEAR:DIMA»(4).B*( 

ON HEXA = > B 

INAIRE":PRINTTAB(15>iSTRING*(27. 131 >: PRINT: PRINT : PR 

I NT: PR INT: PR INT: PHI NT 

530 GOSUB1 135 

535 IFLENCZ»))4THENGOSUB1168ELSE545 

540 GQTDfi;.5 

545 IFLEN(Z«)=4THEN565 

550 IFLEN<Z»)='3THEN575 

555 IFLEN(Z»)=2THEN588 

S60 IFLEN(Z»)-1THEN5S5 

S65 C«=RIGHT»tZ«. 2)!D*=LEFT»(Z».2> 

578 R*(1)-LEFT*(D«. 1) : A»(2) =RI GHT»(D*. 1 > : A«<3> -LEFT 

*<C*. 1):A*<4) 

=RIGHT*(C».1> :GOTOS90 

575 A*C2)-LEFT«(Z*. 1 ) :C«-RIGHT*< Z4. 2) :R» (3) -LEFTKC 



"CONVERSI 



t R : 



' :A*(4)-RIGHT»(Z*. I) JGOTO390 



: I FZ > =81 92THEN2BOELSE2B5 
■ : I FZ > =4B96THEN2 1 B6LSE2 1 5 
1 ! IFZ) *2843THEN22BELSE225 
1 : IFZ) =1024 THEN23BELSE235 

IFZ) "5I2THEN240ELSE245 



-ELSEP*- 1 



: IFZ) -2TMEN32BELSE325 



. I>OV4THENNEXT 



•*0»: RETURN 



310 Z-Z- 

3IS IFZ)=2THENP*=-1 

320 Z-Z-2 

325 IFZ)-lTH£NO«-"l-EL5EO*«-B- 

330 T»-B**C«*D«-.E«*F»*G«*M»*I«*J*- 

333 V*»"1":FORX-0TD15:IFHID«'T».X* 

~40 N-16-X:»»=RIGMT*(T», N) 

3^5 IFW*-- ~THENM«-"0" 

350 PRINT! PRINT" ==-««— —- vflL EUR BINAIRE — ) "!W» 

355 GOSU81 135:GOTO140 

360 CLEAR:DIf1A»'4).Y*'4):CLS!PRINTTflB(I5):-C0NVERSI0N DECIMAL -= 
r»«.^p RINTTBBM5j . STR , NGt , 27 1 3l ): p RINT! p RINT .p RIVT .p f , INI .p RI 



NTtl 



OM 



365 GOSUB150 

^70 R»-RIGHT«(T«.B) :S*-LEFT«<T*.8> 

373 A*'l>.RIGHT«fR*.4>tA*<2)»LEFT»CR*.4> 

3«0 A«<3)*RIGHT»<S«.4> : A*' 4) -LEFT*' S*. 4) 

3e5 FQRX-1T04 



i:A»<4)=RI 

GHT*(C*.l):DaTO590 

580 A*<3)=LEFT»(Z«. 1 

5e5 A*f4)"Z» 

590 FORI=1T04 

595 IFO»(I)--0"THENB*<I)="0080 

E00 IFA»(I)--1-THEN8*(I)-"0001 

E05 IFA»(I)--2"THENBKI)="M10 

S10 IF«»(I)-"3"THENB»(I 

615 IFO»ri)»-4-THENB*r 1)^-0100' 

G20 IFA«(I)="5"THENB*(I)-"0 

625 IFfi»(I)="6-THeNB*(I)-"0 

&30 IFA»(I)=-7"THENB*ri)--0 

635 IFA»(I)--8-THENB»(I)=-i 

640 tFB*<I>»"9"THENB»(I)"-ll 

645 IFA»CI>="A"THENB*(I>»-1010' 

650 IFA»<I)=-"B"TNENB*n )=-10ll 

655 IFA»(I)--C"THEN8*CI)=-110e 

860 IFA»(I)="D"THENB»<I)-"1101 

665 IFA«(I)»-E"THENB*(I)-"U1B 

670 IFP*( I)-"F"THENB»(I)-"111 1 

675 NEXT 

6B0 IFB»Cl>."00aO-THEN6B5ELSE713 

683 IFB»(2)-"0000"THEN690ELS£71B 

690 IFB*(3)-"0000-THEN695ELSE705 

695 IFB«(4>*.-a«00"THEN700 

700 T»»B«f4) 1GOTO720 

785 T»=B*<3)*Bt<:4) :GOT072B 

710 T«=B»(2)*B*(3)+B*(4) SGOT0720 

715 T*=B«f 1)*B»(2)*B*<3)*8*(4) 

720 N.LEN<T*>:V»--J"rFORX-BTONiIFHID*<T». X+l. ])<>v 

THENNEXT 

725 U*N-X:IFU.-lTHENH»-"0-EL5EW»-RIGHT«{T»,U) 

=? P IM« T!PSINT:PRIMT ""~'*~ — VOLEUR BINAIRE 

735 GOSUBI I33SD0T0325 

740 CLEAR:CLS:PRINTT0B(15):"C0NVERBION BINAIRE •-> 
DECIMAL '■! PR IN fTRB< 15) I SIR! NG« ( 30, 1 31 ) : PRI NT 
:PRINT:PR[NT:PRINT = PRINT •»»*■»»# rK,NI 

745 GOSUBI 155 
750 N-LEN(Z») 

755 IFNU6TMENGOSUB1160ELSE763 
760 G0T0748 
763 X-! 

770 IFN=l&THEN775ELSE780 

775 A*»MrD»rz«, x. l):A»VAL<:o»>:n=0*32768!X-X- 
7S0 I FN- 1 5THEN7B5ELSE790 
785 B*-MIDt<Z».X, I)lB-VAL«B»)iB-B*163B4:X-X. 



'PRINT 



790 IFN-UTHEN795ELSE800 

795 C»"MID*(Z«. X, 1)JC-VAL'C»HC-C*8192 

B08 IFN-13THEN805ELSEB10 

805 0*-niD»«Z*. X. 1)!D-VAL'D») !D-0-4B9SiX-x*l iN-N-l 

B10 IFN-12THEN815ELSE820 

815 E»«MID»(Z». X. 1)IE«VAL'E*>1E-£»2B4BIX-X.HN-N~1 

820 lFN.lITHEN82SELSEe3.0 

825 F»-MID»(Z», X. D:F-VAL(F»)iF-F.ie24tx-X.l:N-N-I 

830 IFN-10TMEN835ELSES4B 

833 G*-MID*<Z».X. lHG-VAL(G«)!G-G«512iX-X»liM-M-l 

S4B IFN=9THEN845EL5E850 

345 HS=niD*CZS. X, l>>H*VAL(H*):H-H>23G:X-X*ltN*N-t 

850 IFN-BTHEN855ELSES60 

855 Il-MlDtrZt. X. 1) : I-VflL<I»)H-I-I2S:X-X*UN»N-l 

860 IFN-7THEN865ELSEB7B 

865 J*-MID«(Z». X. l):J.VAL<J«)!j=J*64:X-X*ItN-N-l 

E7B IFN^6THENS75ELSEE80 

B75 KO-BflMCZ*. X. l)!K-VAL(K*>:_K-K*32!X-X»liN-«-l 

8S8 IFN'5TMENBB3ELSEe90 

SB5 L« = MID*CZ«.X. l):L=VAL(L«)!L-L»16iX-X*UI*-»*-l 

S9B IFN=4THEN895ELSE9B0 

895 Ot=MID»CZ», X, l):0-VBLfO») : 0=D»S: X-X* 1 :N-n- ; 

900 IFN-3THEN905ELSE91B 

90S M*^MID»(Z*. X. DIM-VALCM*) :H»M-4:X"X + 1 : N-N- 1 

91B IFN=2TK£N915ELSE920 

915 0«=MID*<Z». X. 1) :0-VAL<a»>>0-0*2:X-X*liN-M-l 

920 IFN=1THEN925£LSE930 

925 P»°riID«(Z». X. D:P-VAL(P«)iP>P*<t 

93B V-A*B+C*D*E*F*G+H.I«JtK*L*0*M*O*P 

935 PRINT: PRI NT: PRINT—————— yftLEUfi DECIMAL «) "!V 

940 GOSUBI 135 

945 GDTO740 

950 CLEAfl:DIME*<4).F*<a):CLS:PRINTTA8<13):"C0NVEftSI0N BINAIRE - 

> HEXB-:PRINTTAB(15):STRING»<27. 131 ) : PRI NT: PR INT : PRINT t PRIN' 

NT: PRINT 

955 GOSUBI 1 35 

960 N-LENCZ») 

965 IFN) 16THENGDSUBlie0ELSE975 

970 GOTO950 

975 A»=- 0000600800008000- 

980 P»16-N 

985 I FN- 1 6THEN995 

990 B*=LEFT*(A». P) :Z*=B**Z» 

995 C»-LEFT«(Z«.S) !D»-RIDHT»(Z».8) 

1800 E»( 1)«=LEFTKC».4) :E*{2»-RtGMT»(C«. 4) 

1005 E«C3)=LEFT»<D«.fi)!E«<4)»R!GHT»<D«.4> 

1010 FORX-1T04 

1015 IFEt(X)«"8000"THENF*<X)-"0" 

1020 IFE*(X)=-00B1"THENF*(X)«-1- 

1B15 IFE«<X>°"0B10-THENF*(X>-"2" 

1030 IFE»CX)-"00l l-THENF»<X>-"3" 

1035 IFE«fX)--0100"THENF*CX)-"4- 

1040 IFE*<X)--0101"THENF«{X)-"5" 

1B45 IFE«f X)--0U0 ,i TMENF*<X)-"6- 

1050 IFE»(X>»-01U"THENF»(X>-"7" 

1055 IFE*<X)=-10BB-THENF*(X)-"8" 

1060 IF6KX>»-lO01-THENF*(X>--9" 

1865 1FE*(X)-"10I0-THENF*O 

1870 IFE»CX)--101 1-THENF40 

1075 IFE*(X)-"1108"TMENF»(X)-"C- 

1080 IFE»*X)--1 101"THENF*(X)--D" 

1085 IF£«CX>-*ltl0"THENF*<X)-"E- 

1090 IFE«(X)-"11U"THENF*(X)- ,, F- 

1B95 NEXT 

1100 T»-F»tl)*F*(2)*F«(3)*F«(4) 

1105 V«-' , 0":FOSI-0TG4: IFMIDKT*. 1*1. 1 )-V*THENNEXT 

1110 H-4-I !W*-HIGHT«CT».H) 

1 t 15 IFH»»"-TMENUt-*0- 

112B PRINT:PRINT:pRINT"— — — WLEUR HEXODECIMAL --) 

1125 GOSUBI 135 

1130 GOTO950 

1135 PRINTiPRINT 

MEME TYPE fO/N) 

1 140 X»>1NKEY* 

1 143 IFX«O"0-ANDX*O "N"THEN1 140 

1 150 IFX^'O-THENRETURNELSEDOTOIB 

1155 INPUT"£NTHEZ LA VfiLEUR CONVER' 

SERETURN 

1160 PRINT:PRINT:PRINT"DE50LE JE NE CONVERTIS OUE DEK MOT^ Dr If, 

BITS MAXI-tPRINT"VEUILL£Z RECOMENCER S' 1L VOUS PLAI T" : PRINT i FOR 
I "0TO3000 I NEX T : RETURN 

1165 DATA 1 5444. 189. 15445. 144. 15509. 139. 15510. ISO. 13373. 129. 1351* 
. 160. 15512. 158. 13513. 129. 13449. 184. 15430. 191. 13SB5. 144. 15384. 176 
. 13583. 180. 13582. 191. J53B1. 139. 13316. 168. 13317. 191. 15453. 168.134 
54. 176. 15455, 176. 13436. 176. I352I. 157 

1170 DATO15520. 187. 15519. 176. 15318. 176. 15587.173.13323. 190. 13460 
. 176, 15461.178. 15462. 17G, 13463. 144. 13327. 170. 1332B. 148. 13592. 133 
■ 15591. 170, 15466. 144, 15530. 149. 13329. 170. 1539'.. 13 
93. 176. 13596. 176, 15397. 176. 15398. 167 
1175 DATA15534. 191. 13470, 144 



>-*A* 




RINT-DE5IREZ VOUS EFFECTUER UNE CONVERSION DU 



lZ»i IFZ«~ 



• 13394. 163. 1 



SECRET DE LA MOMIE 



Suite de la page 3 

3990 PLOT Sia,5B ORAU 2,-8: PLO 

T 210 ftB OAAU 0,4*. ORAL! 2,0 P 
LOT 214, 40 DflAU -2,-3 PLOT 214 
,60 DRAU 0,44 DPflu -2.8 

3291 PLOT 192,80 ORAU -8,2 PLO 
T 1*2,80 ORAU 18,0. PLOT 214,80 

DRAU 17,0 &RAU 8,2 PLOT 192, 
8* DAAU -8,-2 PLOT 192,84. OPA 
U 18,0 PLOT 214,8* DRAU 17,0 
DRAU 8 , -2 

3292 INK 3 PRINT AT 11 , 31, "C" , A 
T 11,21; •U", AT 8,26, "N"; AT 16,26 
, "S' 1 INK 4 

3993 RETURN 

♦000 5T0P 

4060 INK 4 CIRCLE 232,13,3 CIR 

CLE 232,13,4. INK 3 PLOT 232,13 

INK 6 RETURN 
*060 IHUEBSC 1 GO 3U0 4050 IMy 
ER3E RETURN 

*101 LET B1>INT (AN0t3i*t: ir 81 
»1 TMEll LET 61»-2 

4102 IK Bl>2 THEN LET Bl«-1 

4103 IK BL3 THEN LET 81-0 

4106 IK 61-4 THEN LET 81=1 

4107 IK Bl«5 THEN LET 81.2 

4103 IK PIE*. 2 OR PIE>.19 THEN L 
ET RN.INT IPND#21)*1- RETURN 
4110 LET AN.Cie.Bl RETURN 
4120 PRINT AMUBIS, Dt«U qui pro 



PLOT 73,7 



4133 CL3 : CO TO 4 120 
4199 3T0P 

*300 SEEP .3,6 INK - 
5 DRAU 0.3B DRAU 30,0 DRAU 0, 
-30 DRAU -30,0 POP P.76 TO 128 
STEP 4 PLOT 103, K DARU 3,0: N 

4320 KOR F«7B TO 128 3TCP 4: PLO 
T 78, r. ORAU -3,0 NEXT r. KOR K 
■75 TO 103 STEP 4 PLOT K , 123 
RAU 0,3: NEXT K: KOR K.78 TO 108 
STEP 4: PLOT K , 75 ORAU 0,-3 N 

exT r 

4322 INK 6 RETUBN 

J430 BEEP .2.18: LET BUP.INT (AN 

0»*l : INK 3 PRINT AT 5*SUP,3;"«> 

INK 6 RETURN 

**3 BEEP .2,13 INK 7 LET BAP. 

~ OT 20>BAP,3O: Ofi 



1BnD»751 P 
RU 0,26: DAAU 2,. 
°AU 2,-2 DRAU 0,-*o „, 
DRAU -11,0 DRAU -2,2 



DARU ii 

DAAU -2,-2 

L/nnw -Al.W L.KMU -tf,2 

450 plot 20 .bar, 36 drau 13,0 
drau 0,2 drau -13,0 

4431 plot 20*sap,44 opau is,o 
doau 0,2 drau -15,0 

4432 plot 20. bap, 52 drau 18,0 
drau 0,2 obau -{3,0 
4*33 plot 27. bap, 26: drau 0,32 

iu 0,-32 ink 8 act 



DRAU 

URN 

*453 OCEi 



LET BOP * INT 



«Z 4 



tcou 



AT ; 



PA ii.. . 
ue < ENTER 

4730 

*,-19 BEEP 



Chtr 
t du 1 
[MM 



PAUSE 



GO Tt 
4130 BEEP 1,-19 BEEP 1,-19 PAU 
SE 40 CL3 PLOT 100,20 DRAU 1 
0,58 DAAU 10,-5 PLOT 100,20. D 
RAU 15,40 DAAU 10, -3 DRRU 15, 
35 DARU 12, -3 PLOT 120,70 DRA 
U 12,55 DRAU 12,-5 ORAu 10.50 

PLOT 152,183 ORAU 3,63 
4132 KOR f -30 TO -20 STEP -1 8 

EEP .002,f-RNDtS BEEP . 005 . ( 
NEXT f 



TO 
140 ™ 

4486 PLOT 136-B0P,131 DRAU 13.0 
DRAU 0,-15 DRAU -18.0 ORAU 
,15: AeTuRN 

4*57 DATA 1,3, 1,*, 2, 2, 2, 5, 2, 6, 3, 
1,4,1,5,2.6,3,6,4,5.3,3,6 

4300 IF CT.l TMEN INK 4: 00 TO 4 

4301 INK 3 

4502 CIRCLE 150,13,3 CIRCLE 160 
.13,4 PLOT 165,18 DBAU 13,0 P 

LOT 183,15 DPAU 15,8 DRAU 0,-4 
DPAU -1,0 DRAU 0,4 ORAU -4,0 
DRAU 0.-4 ORAU -i,« DRAU «,* 

4303 INK 6 RETURN 

4310 INUCPSE 1 00 SUB 4302 INU 

ERSE RETURN 

4350 PLOT 170.3 ORAU 36.0 DRAU 



0,23 DRAU -38,0 ORAU 0,-22 

4351 PLOT 213,3: DRAU 37,0 DRAU 

0,23: DRAU -37,0 ORAU 0,-23 
*552 RETURN 
*750 CLS PLOT 60,30: ORAU 0,30 

ORAU 10,-10 DRAU 0,-30 DRAU 
-10,10 

4751 PLOT 60,80 ORAU 7,-1: DRAU 
3,-10: PLOT 57,7<3 DBAU 100,0 

DPAU 3,-10 DRfiU -100,0: PLOT 17 
0,6« 

4752 ORAU 0,-29 DRAU -100,0 
*753 PLOT 172,40 ORAU 0,100. DA 
AU 3,-3 DRAU 0,-100: DRAU -3,3 
*7S* PLOT 172.1*0 ORAU 3,0' DRA 
U 3,-3 ORAU 0,-100 DRAU -3,0 
PLOT 177,137 DRAU 3,0 

*7S5 PLOT 177.113; DAAU 5,0 DRfi 

U 13,-10 DRRU -3,0 DRAU -13,10 

PLOT 193,105 DRAU 0,-3 ORAU 

-3,0 DRAU 0,4 DPAU 0,-4 ORAU 

-13,10 
4758 PLOT 172.122 ORAU -10,7 
PAU -5,0 DAAU 14,-11 PLOT 157, 
129 OBAU 0.-4 DBAU 14,-11 
*800 RESTORE 4823 KOR K.l TO 12 
4B05 READ A, 6 BCEP A, 8 
4610 IK INKEYS." ' THEN 00 TO 3 
4813 NEXT F 

4820 PRINT AT 20,0 ,'■ ( SPACE > P 
OUR BECOMMENCER '* : 00 TO *600 
4623 DATA 1 , 9 , . 3 , 11 . « . 5 , 12 , . 3 , 1 
1,0.25.11, .23.9, 1,9,1,9, .8,7, .23 

" .23,7,2,9 

10,3, ' 

6,3 BEEP .8,12 PAINT 
PAINT PRINT PRINT 

fl UN COULOIR NOIR... *' 
PRINT PRINT PRINT 

PRINT » J-Y UAIS. ' 

02 , 7 BEEP . 006 . 4 BCEF 
PAUSE 100 CLS GO SUB 

TO 9970 
5555 PAINT AT 20,0, " 

PRINT AT 21,0, " 
■' RETURN 
6200 RESTORE 6210 KOR r.l TO 24 
READ MU.SI' BEEP MU.3I NEXT K 



. .25,5, .3,9, .25,9, .25,7. .5,3, .23 
,7 .23, 9, .3.9,. i3, 7., 23. 9. 3 97. 

3,5, 1,7, (,0 
6300 RETURN 

6500 PRINT AT 20,0, ■' IL N'Y A RIC 
N SOUS ",AT 21,0, "LC TAPIS.' 1 BE 
EP .2,-3 PAUSe 80 RETURN 
7000 BEER .05,4 BEEP .06,5 BEE 
P .07,6: BEEP .08,7: BEEP .09,8 
PRINT AT 19,1, INK 2, PAPER 6, 



GO SUB 



INT AT r 
■ NEXT K 
I KOR K»0 TO 19 PRINT AT K 
PAPER 2, "| '■ : NEXT K 



APER 2, 



10 INK 6 RETURN 

7020 PRINT AT 19.8, 

7021 RETURN 

7023 PRINT AT 0,6. ' " ' RETURN 

7030 FOB K.8 TO'll PRINT AT K , 1 

■»,- ■' NEXT K RETURN 

7033 FOR F.8 TO 11 PRINT AT F.O 

," NEXT F 

7036 RETURN 

7020 IK N2»2 THEN GO TO 7100 RE 

7093 GO SUB 7120 RETURN 

7100 BeEP .01.9 PAINT AT 20,0. " 
QUELLE CHANCE..." PRINT AT 21.0 
,"IL CTAIT OUUERT'...', PAUSE 6 
00 SUB 3333 

7101 OECP .01.3 IF N3<-3 THEN P 
" 20,0, DEDANS UNE AhulETT 



PRINT 
PRINT 
BEEP 

.006,4 
7800 1 



E.." PAUSE 

7102 IK N3<i 
PRINT AT 20 
PAUSE 



RN 



4 THEN SEEP .01,12 
0, "ET DCOANS UNE CLE 
100 LET CLE.l RETu 



7103 IK 

SEEP .06 

E CHANCE 

, "LA CLE DU _ 

let ct-1 returi 
710* bec- 



I BEEP .03,3 

.- .IT 20 ,0, "OUELL 
DEDANS'' PAINT AT 21,0 
"' ~gtJBeA.ll,," PAUSE 10 



00 SUB 3535 LET KE' 
7101 RETURN 

7122 BEEP .1,0 PRINT AT 20,0. "J 
E N AI PAS DE CLE..." PRINT AT 
21,0; , 'C , E3T DONC IMPOSSIBLE" PA 
USE 100: : RETURN 

7159 PRINT AT 20,0, 'SOUS LE TAPI 
S";AT 21,0, "IL V A UNE THAPPE?" 

LET TRAP«1 PAUSe 10* RETURN 
7131 PRINT AT 28,8."RIEN SOUS LE 
" PAUSE 60 RETURN 
INT AT 20,0, JE L'OUURE.. 

. ,AT 21,0, "IL V A UNE CLE." P 
mUSE 100 LET KEY.l RETURN 
7*60 PRINT AT *,2l, FLASH 1, INK 

7,"PIECe NO ",PIE. INK 6 RETUR 

7308 BEEP .3.-20 PRINT RT 20, : 
IMPOSSIBLE 1 JE NE UOIS'.AT 21,0, 

" PAS OE COKFRE..." PAUSE 100 

RETURN 

7520 BEEP .3,-20 PRINT AT 20.0, 

"IMPOSSIBLE- JE NE UOIS'.AT 21,0, 

"PAS OE BOITE A BIJOUX" PAUSE 1 

OB RETURN 

7330 BEEP .3,-20 PRINT AT 20,0, 

"IMPOSSIBLE- JE NE UOIS-.AT 21.0, 

" PAS DE TAPIS..." PAUSE 100 A 

ETURN 

73*0 BEEP .5,-20 PRINT AT 20,0, 

' IMPOSSIBLE' JE NE UOIS'.AT 21,0. 

" PAS OE TRAPPE..." PAUSE 100 

RETURN 

7550 BCEP .5, -IS POINT AT 20.0. 
IMPOSSIBLE' JE NE UQI3",AT 21,0, 

" PAS OE CLE" PAUSE 100 RETURN 



PAS AMULETTE. . . 
RETURN 
7802 LET FIN«0 LET 



IS...RIEN DEDANS.." PAUSe 100 
RETUBN 
7120 IF KEY.l THEN BEEP .1,4 PR 

?NT AT 20.0, "JE L OUURE AUEC HA 
'.AT 21,0, "CLE. . GO SU6 *510 



780* LET KIN 
IF I'" - 



78 

7903 LET 
" .3 AND 



_ LET KP.INT iRNDt 
THEN LET FIN.l CO T 



'RND.JO' >1 IF K 
AND KG 1 >5 AND KCi 

.6 AND KG>)7 AND *0<W AND KO.,1 
2 AND KG0I6 AND KG<>21 OR KO'PI 
E TMEN 00 TO 7803 

Suite page 12 



CARACTAIDE 



CARACTAIDE permet de remplacer les caracteres or- 
dinaires par des caracteres. des symboles, des dessins 
qui peuvent elre melanges avec des graphiques Haute- 
Resolution. La creation des caracteres se fait tres aise- 
ment grace a un editeur. Parmi les avantages de ce 
programme . il faut souligner la facilite de manipulation 
des signes crees grace a la commande "& ", s'utilisant 
de la meme (agon que la commande "PRINT". II est 
ainsi possible d'animer sans difficult 6 un ou plusieurs 
symboles. 

Airy ANDRE 



Moded'emptoi: 

Pour utiliser CARACTAIDE dans un programme BASIC, il suffit d'in- 
ciure au debut du programme: 

10 PRINT CHRS (4)"BRUN PR.AS 90O0":REM chargement du gene- 
raleur 

20 PRINT CHRS {4)"BLOAD xxxx.AS 9100":REM xxxx- set de ca- 
racteres 

Ensuite, pour afficher les caracteres crees. il suffit de faire: 
30 PRINT "ABCD";VAL("12"):REM ecrit A8CD12' sur la page TEXT 
40 HGR 

50 & "ABCD*;VAL("12):REM ecrit ABCD12' sur la page TEXT et 
HGR 

Pour les personnes possedant un APPLE 11+ sans minuscules, 
celtes-cr sont neanmoms disponibles grace a la commande ctrIA" ou 
'CHRS(I)'. 

60 & "ABCDabcdABCD":REM ecnl ABCDabcdABCD' sur la page 
TEXT HGR et 



60 & "A8CD"CHRS (1)"ABCD"CHRS (irABCO":REM ecrit la meme 
chose. 

Pour utiliser CARACTAIDE en assembleur. il suffit dutihser S 9030 
comme adresse de la routine d'affichage. 
Exempte:L.DA S CI 

JSR S 9030 
Ce programme affichera la letlre 'A' a I'ecran. 
Creation de caracteres: 

Pour creer des caracteres ou des motits quelconques, il suffit d'utili- 
ser le programme CREER. Si vous voulez modifier un set de carac- 
teres deja existant. il faudra le charger en utilisant I'option V{OAD). 
Vous pourrez ainsi vous servir de tous les sets DOS TOOLKIT ou 
de meme format. Apres avoir tape 'C'(REATION). vous pourrez re- 
definir un des 96 symboles modifiables. Vous pouvez choisir le ca- 
ractere a modifier, soit en le tapant ('Caractere). soil en dormant 
son code ASCII fN'umero). Si vous ne possedez pas les minuscu- 
les sur voire clavier, vous pourrez les obtenir en appuyant simulla- 
nement sur la louche CTRL. 
Exemple:Pour redefinir la leltre T, taper: 

'C'(realion) 

'C'(aractere) 

'f'si vous possedez un APPLE 'le ou 

CTRL-F' si vous possedez un APPLE 11 + 
Pour dessiner votre caractere, vous disposez de 7 commades: 
'A' curseur vers le haut. 
Z' curseur vers le bas. 
«- ' curseur a gauche. 
— * curseur a droite 
'X' laisse une trace sous le curseur. 
espace' efface la case sous le curseur. 
'esc' enregistre le nouveau caractere. 
La matrice de creation a une dimension de 7 x 8. 
Vous pouvez remarquer que le curseur peut sortir du cadre dune 
case vers la gauche. Si vous laissez une trace a cet endroit. toute la 




APPLE 



rangee sera decalee d un demi point vers la droite. ceo peul etre 
tres pratique pour dessmer de belles diagonafes. 
Apres avoir tape esc*, votre nouveau caractere est affche Pour vcr 
I'ensemble du set. il faul utiliser loptron 'V'(OiR) Ce"u>-a peul-etre 
enregistre sur une disquette en lapanl 'S'(AUVER) 
ANIMATION: 

En combinan! plusieurs caracteres. vous pouvez creer des motifs 
plus important (voitures. fusees. ). 

Par exemple. en redefimssant les tettres a.b.c et d pour former uoe 
fusee: 

10 HTAB 18:VTAB 12& "abed". 

Cette hgne dessmera une fusee au milieu de I'ecran HGR 
10 HGR 

20 FORT- 1 TO 35 
30 & "abed" 

40 FOR I- 1 TO 100:NEXT I 
50 NEXT T 

Si vous voulez une meilleure animation, il faudra dessiner les posi- 
tions intermediates: "abed* sera la fusee et "efgh" sera le meme 
dessin, legerement decale vers la rjroile. Ainsi. vous pourrez dessi- 
ner votre fuee n'importe ou sur I'ecran. alors quun caractere doil 
prendre une position bien precise. 

Remarques sur les listings: 

La saisie du programme 1 esl indispensable si vous ne possedez 
pas I'assembleur LISA, auquel cas. vous ne rentrez que le listing 
Ibis. Sinon. procedez comme suit: 
■ 9000:A9 FE 85 73 A9 8F 74< RETURN > 
•9008:A9 4C... 

* 90D0;50 D0< RETURN > ' < Ctrl >< RETURN> 
BSAVE PR.AS 9000. LS D2< RETURN > 

Programme 2: Le programme 2 permet de redessmer les caracte- 
res. Etant ecrit en BASIC, sa saisie ne souleve aucune difficulte. 
Son emploi a deja ete commente. 
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93 




38 


ni 


36 Vf 


'9 28- 


A9 


.,! 


■'■ 


W 


■■< 


Ml 


DA 




*s;e- 


HO 


W3 


a/> 


A9 


^ 


B^ 


a? 




,., . i . 


fl4 


.!■; 




tin 


t4 


OS 


A|> 


v,q> y? 


9839- 


»1 
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IF 
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4F 


)9 
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A9 
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■ 
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A? 
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«A 


R9 
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98 


sa 
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flft 


H4 




9a 88- 


A4 


89 


HI 


8 7 A4 
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in 


A5 
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A9 


14 


fffi 


«A 
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C9 
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F9 


- 


FA 


fl9 




"■■■-■ 


HH 


v(1 




84 AC 


08 


J, -! 
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NM- 


F8 


p-c 


29 


?fl 


?l 


71 


?? 


22 ^~~^^ 


ttea- 


Si 


23 


/» 


/» 


t\ 


21 


77 


22 


9988- 


23 


23 


28 


.■' 


/\ 


V\ 


7? 


22 


99B3- 


23 




H» 


!ift 


ie 


Aft 


Bd 


89 


98C9- 


te 


m 


28 


AH 


fH 


AH 


?fl 


A3 


-'9C8- 


*a 




iH 


U» 


■<■ 


17ft 


nn 


09 


>ace - 


w 


ot 














Ibis 
















MM 








2 






DCM 'UfilTEPR!" 


■w* 








3 


GEHEWUELTP OE CAPACTEPES 


8 SSI 












HftUTE-PESOLiniUJ 


asae 

3S8S 

aaes 








5 






COUtEUR 








7 










»Wt 












H*Wl 


/ }C4*J\tC 199* 


»8«B 








9 


APPLE 


II 


48K (OU /7E) 



7B»ft 
DA05 



M94 B5 1 



OBJ *S»B 
EOU »DA£>S 



* OE HIMEM ET ( 



LOA / 
STA » 



r '*tC. 9D ^j 8 3 

9«8I< A? 19 

v««r ar> e» hj 

?»I2 A9 9( 

''814 90 F7 13 
9817 68 



9838 

9138 

7830 94 It* 

9*32 A9 88 

9134 84 18 

VI ■■• 

9839 C9 81 

983B 08 89 

98 30 d5 e:t 

98 3f 49 28 

9)41 B5 83 

9843 4C 9« 98 

9884 29 7F 

9».ie t* if 

984A 38 4E 

ff4( fv J | 

984E 38 8 7 

''«» C9 3E 

9852 18 83 
''»M IB 

9835 45 83' 
9837 
983/ 3B 

9830 EC 21 

985A B3 8 7 



■IV. M4C 
VTA «1PE» 
LM iDE6UT 
STft AMPEP'l 
L» 70EBUT 
STA M1PER«2 



IN1TILIMTI0N DE L'A0PES5E 
OE LA BOI/riHE tfAFFlCHftOE 
PUI r . QFFICrtGOE PE LA CMAINE 

(ppirm, puis cfjiise a 

L'AWSESSE NOWWLE (*9EeDl . 
DEBUT: 

LOA 18 
STA 83 
LOA I M BUT 2 
STA »34 
LOA /D€BUT2 
STA *37 

jsft ppitn 
i.w. »*erj 

STA 834 
LOA »*9E 
MA %-}? 
»7S 
[ CALCUL 0(. L'AOSESSE OU CAftACTEl 



SIY *B 

■.t,-. iMi 

Off «*&! 



9B7B 
9978 

98 7B IB 
98 7C Al 88 
987E B4 89 
9188 

78B8 A4 89 
98B2 Bl 87 
9884 A4 24 
9894 91 85 
9899 IB 



7891 C? 87 
7893 FB 85 
9895 E4 8? 
7897 4C B8 98 
98 9A 
78 9A 

789A A4 84 
787C AD 88 83 
787F 4C Fl FO 

mm 

78A2 
7SA2 

98A2 28 28 21 
2821212222232328 
7IA3 21 22 22 
7BA8 23 23 2t 
9BAB 28 71 21 
98AE 22 22 23 
98R1 23 28 2B 
9884 21 21 72 
7887 22 23 23 
78BA 88 Bt 88 
A323AB2BA82EiAB38 
98B0 B8 88 BB 
98C8 88 



ftSL »7 
ROL »8 
ASL »7 

ROL *B 
ASL %? 

BOl *B 
CLC 

LDA t:>\ 
AOC *S 
STA tB 

CALCUL OE L'AOfiESSE 0£ LA 
LI&NE HI-RES 

LOV »25 

LOA V>*4UT,r 



LOA (487),* 
LDY »24 
STA <tt5).I 



LDY t4 

LDA *388 
JMP tFOFB 

AORESSE DES 24 LICWES 
DE L'ECRAN MI-RES 
VHAUT HEX 2B2B212I222223732* 

28212122222323 



REM CARACTA I DE-CREAT I ON 

REM ••••••••••••••••••• 

REM AIRY ANDRE 

REM POUR APPLE I I */ I IE 

REM ................... 

REM 



PRINT CURB <4>"BRUN PR,A«90 

TEXT 

HOME : 

PRINT ■ 

L10AD V10IR 

NORMAL : FRINT "HAur-A, PAS- 

Z. BAUCHE" -, DROITE'- ": Pfl 

"EFFACE-rupJCB, MAROUE-X, F 



3ZO FRINT -NIUMERO DU CARACTERE 

DU OARACTERE" "I 
340 GET A«i IF A* < ' "M" AND A 

• X- THEN 340 
350 IF A» - "N" THEN PRINT I INPUT 

"NUMERO DU CARACTERE I "IN: IF 

N < 32 OR N > 127 THEN 350 
360 IF A* - "C" THEN PRINT ; PRINT 
"CARACTERE j " i I GET N»i PRINT 

N»:N » ASC (N8)i IF N 1T7 



INVERSE 



OREER 



REM CTRL.-A - I 

REM •••••••••1 

IF N Z2 THEN 

N - N - 32tAD - 



145 I 



VTAB 211 FOR T ^ ;: 10 127: f 

CHR« (T)!: NEXT : PRINT 
NORMAL : POKE 34,5: PC*E 35. 



1 A8 3 



Afl 



78C4 28 AS 2B 
78C9 AB 58 D8 
7BCC 38 08 38 
78CF OB 38 08 



220 


HOME 


230 


FRINT : PRINT -TAFP,' VOTRE C 




HOIK. . ." 


240 


POKE - 16366, 0: WAIT - lb~. 




34. 12B: GET At 


246 
249 
250 
251 
2iSO 


REM 


REM SAUVEGARDE D'UN SET 


IF A* - "S" THEN HOME i tNPUT 




"MOM DU SET DE CARACTERESl " 




|A*I PRINT i PRINT CHRt I4» 




" BSAVE "At •' , At9 1 1» >,L,t300" : RUN 




160 


260 
269 

271 


REM 


REM CHARGEMENT D"UN SET 


IF At ■• "L." THEN HGME : INF'UT 




"MOM DU SET DE CARACTERESl " 




lAt: PRINT i PRINT CHRt <4) 




"BLOAD -At",A«910O"l RUN 160 


20Q 
290 

;oo 


REM 


REM VISUAl.ISCiTION DU SET 


IF At - "V" THEN HGR : VTAB 




17: HTAB 11 FDR T = 32 TO 12 




7: h CHRt (Tli! NEXT ! GET 




At: RUN ]f,-> 


' 10 


IF A* < > "C" THEN HOME : GOTO 


^1Q 


MM 



REM CREATION D"UN CARACTERE 
REM •• ■■■■■•■ 



HOME : HTAB 9i VTAb 9i t 
FOR I - 1 TO 8: HTAB 9i 
NEXT : HTAB 9i PRINT "•< 
FOR T - O TO 7iAt(T> - ' 

NEXT 
K - BlY - 10 

VTAB Vt HTAB X 
IX » X - lOiTV - Y - 10: 

X O THEN IX - 7 

GET At: IF At • CHRt C 
i TO 7iAt(Tl - 



I HI, 



; NORMAL 

(AttiYi , r> « 

IfttlTYl.TX • 

IF At 

! NORMAL 



THEN PRIT 



i i I 



,TX 



5lO 
320 
330 



lAtlTY) .TX ♦ 31 
IF At - "A" THEN ' 
IF A* - "7" THEN \ 



(G) THEN > 



340 
350 ; 



GOTO AtiO 
FOR I ' n 
TO 7 



NEXT t F-rn I AD 

Nf.XT 

HGR i VTAB I2l 1 



PARLEZ-MOI FRANQAIS! 

Enfin de vrais logiciels d'aventure pour APPLE 11+ , lie et He, ou Von peut dialoguer 
avec son ordinateur, en francais et avec de vraies phrases. 
FROGGY SOFTWARE invente I'analyse de syntaxe: Cocorico! 



PARANOIAK 




PARANOIAK: 

Common! ne pas Insor la (olio qnlopnnlo gunnel les p'oblomos los plu3 noirs vous aubmor- 
qont r.ommo une lonno do'tluror.? Jugo/ piulftl do co quon vous a colift sur los opaulea: 
compioxo d mldriotilO, complexo d'Oodipo. porsoculion. suporslilion, limidilo. otc, Pour 
vous dobarassor de co lonnoau de problcmos. vous dovroz orror dnns la ville oi ronconlref 
Bam qui iorrl suscoplibles do vous liror do co boufbior Au haun] de vos dOambulalions, 
,.,'. ooafflOionU do sonlO. do moral ol d'arqonl (lucluoronl II laudra vous mflnaflor poui 
Mm i-i dtprlffM rotalo ou lintarclus Co |0u pOSSOdO uno analyno do synlaio qw vous 

panTtti da dbiouwr BbwntjrK nvoc voiro apple paranoiak an un |ou congu oi ocm on 
I',]"',.)!'. riinphismo haulo-r630lulion coulour ol humour garnniis Doprjchez-vous nvanl quo 
loi amnncnins no noua lo piralonl. Damnod!! 
EPIDEMIC: 

Cn vous gralouillo ou ca vous chalouiilo' Dilticilo ft drrot Mais cost vous qui olos choi(]6 
do Iroiivni lo romedo ,1 co vinjs qui s'osl aballu sur la lorro Saulo/ dans vOtro vaisseau 
spnli.il pour tiki la navnlin oniio quatro pianoios comploiomonl louloquos. Dos bollos 
•Xtra-UrnHtTH da PARADISIA au* monnlros do FAOULA vous vivio/ dos avonluros .1 C016 

,; " ■'i'"-" 1 '■ " ■ - I ' ''■ ■■" '""''' .ipp.if.iitr, i i ',. mi , [.■[,, du r.li.-il Mai-i ."■, Iwnd: 

dana TEapaca r»a taraianl r*o sils n Olaionl accompaqnOg tin bonds danr, lo lomps! No 
bfusnuemonl on plomo Quorro du paciliquo 



EPIDEMIE 




Vous pouvez trouver ces disquettes chez voire revendeur habitual, ou les commander directement chez SHIFT 
EDITIONS 27 rue du Gal Goy, 75008 PARIS, en joignant un chdque de 350 Irancs, par disquette. 



POIC POSITION r 




ILS SONT TOUS LA ! 

Retrouvez chez vous les super-stars desjeuxd'arcade d ATARI 
lis sont tous la : des celebrissismes PAC-MAN ou GALAXIAN 
jusqu'aux recents JUNGLE HUNT ou POLE POSITION. Le gra- 
pheme, les couleurs, la rapidite : tout y est, il ne manque que le 
monnayeur et /'ambiance enfumee des cafes I 



cemiPEoc t 



ETTOUJCURS 
10 % DE REMISE 
POUR LES ABONNES ! 



PORT GRATUIT ! 






POLE POSITION 
D'abord les essais pour sa 
voir oil sera place voire bo 

lide sur la grille de depart, 
puis c'est la course propre 
ment dite, virages serres, 
crissements de pneus et 
accidents avec voitures en 
flamme ! Graphisme, cou- 
leurs et trois dimensions, la 
stardesjeux de cafes ITrois 
mveaux de difficult^, deux 
vitesses et des compteurs 
partout ! 



TOUS LES JEUX FONCTIONNENT AVEC LE CLAVIER OU 
AVEC LES MANETTES DE JEU. 



JOUST 

A califourchon sur une au- 
truche. une lance a la main, 
vous combatlez les buzar- 
diers sauteurs, chasseurs 
e! seigneurs. Mais ne 
croyez surtout pas que ga- 
gner une bataille suffit, les 
vaincus pondent des ceuts 
de frustration qui sont en- 
core plus dangereux si vous 
avez le malbeur de les lais- 
ser eclore. La joute est ou- 
verte ! 



TABLEAU RECAPITULATIF DES PRIX (PORT COMPRIS) 












^^I^M^ 


VIC 20 (MODULE) 


315 


355 


335 


355 


335 


355 




355 


315 


335 


335 


335 




COMMODORE 

64 (MODULE) 


345 


395 


365 


395 


365 


395 


345 


395 


345 




365 


365 




T.I. 99/4A iMoouiei 


330 




345 


375 




375 




345 




345 




345 




APPLE II ,»,», 


380 


430 


400 


430 


400 


435 


380 


435 


380 


400 


405 


405 


405 




PAC-MAN 

Lesoul, I'unique, I'incompa- 
rable : toujours copte, ja- 
mais egale 1 19 tableaux dif- 
ferent^, de la cerise a la do 
en passant par les citrons et 
les cloches Blinky le rapl- 
de. Pinky le sournois. Inky le 
malm et Clyde qui vous 
coupe le passage, vous at- 
tendant. Si vous attelgnez 
10.000 points vous gsgnoz 
un tour grotuit et le record 
du monde ost a battre I 



hBON DE COMMANDE A DECOUPER OU RECOPIER : 
SHIFT EDITIONS. 27. rue du Gat Foy 75008 PARIS 



MONTANT a payer . 



dnte de In commando ; 
pro vtifM* pom 



•rlu tJ« i* t)»m a* pcuKon E" 



CARACTERES hector 



Ce programme permet de gerer une table de caracte- 
res dune taille de 40 x 40 points maximum (entre 15 
a 20 caracteres suivant la configuration). II utilise la 
particularite du Basic III qui permet de creer des carac- 
teres sans limite de taille a partir de CHR$ (192). 
La table ainsi creee et stockee sur cassette, peut etre 
rappelee par programme pour (aire des animations gra- 
phtques ou des jeux. 

Pascal FALLOT 

Le materiel utilise est le VICTOR LAMBDA ou HECTOR modele 
2HR ou HRX. Le programme est ecril en Basic 3. II convtent de 
charger ce langage dans la machine, avant de charger le pro- 
gramme par LOAD "GENERAT". puis le lancer par RUN. 
Utilisation du programme: 

A partir du lancement. il ne sera plus necessaire de valkJer les infor- 
mations entrees. II suffira de taper ces informations sur le clavier 



c WAT ION DE 
CARACTERES 
JPVRIGHT p. FALLOT 



lOO PR1NTCWR»(16> 

110 * DRAPE AU MAJ/»in 

120 CLEAR lOO.fcBFFF 

130 CK-2 

140 CHO-O 

MO 

I O N <« 

161 WIPE 

162 OUTPUT -UTILISATION DU CLAVIER", 30. ISO, 3 
14.5 OUTPUT-VERS BAS: H ". 1 2. 160, 1 5 OUTPUT"VERS 

MAUT; >I -. 12, 140, 1: OUTPUT "A DROITEi >K",I30,160 

,t:OUTPUT-A GAUCHE: >J~ . 1 ~0. 140, 1 : OUTPUT-VALIDATION 
: :-A", 12, I20,2:0UTPUT"FIN CARAC: >F", 130. 120, 2 
16? OUTPUT -UTILISATION DU CONTROCEUR" , 30, 100, 3 

168 OUTPUT-FOUR VALIDER -■ FIRE" , 12, BO, 1 :OUTPUT~POUR 
TERMINER OIRIGEZ VOL'S-, 12, 60,2l OUTPUT *EN HAUT A GAU 

CHE". 12, 40, 2 

169 OUT PUT "TAPE; UNE TDUCHE POUR CONTINUES". 20,20,3 
->IN8TR*(1I 




170 CLS: 
1BO L3-4SU 






1 : GOSUB 



200 IFN-0THENG0T0760 

210 IF PK20 THEN G0T029O 

220 PLOT 40.100,160,60,1 

230 OUTPUT-A T T E N T I O M", 70,93,2 

240 OUTPUT-1* hauteur de »os dessins", 43, BO, 2 

250 OUTPUT"ne doi t pas depasser ",55, 70. 2: OUTPUT I 
NT»40Q/VAL<A«> 1 .70, 60,2! OUTPUT- 1 iqnes. ". 100,60,2 

260 BOSUB2320 

270 IF ***"N" THEN GOT017O 

280 SCREEN 8.120,230,120 

290 L3=45:L4=l20:L4*="Hauteur du dessin: ..":G0SUB2 
220 

310 IF Jt<INT>C400/N) AND '41 THEN BOTO330 

320 L2=60:L2«="OESSIN TROP GRAND" :GDSUB2140: GOTQ28 



. P":G0SUB2 140: GOTO 
'■ : G0SU&2 1 40: G0T033 
230, 140:CLS:GDT017 



400 G03U82320 



THEN SCREEN I 



430 



WIPE 



II 



470 PLOT lO. 230. 230, 11,2 

«SO OUTPUT-CREATION DE OESSIN No 

490 OUTPUTNI . 180. 228. 1 

EN 8,215,230,213 

310 Q09UB242Q ' — - GRILLE 

320 IF CH0=2 THEN &aSUB290O ; GOTO340 

530 &QSUB2320 ' --> test clavier 

550 GOSUB3I20 ' — , Codification 

560 &r-24547:>-A-I9!*Nl 

570 M)«-*BO0Qs G09UB3Z70 

530 ' dessin cirictert 



OUTPUT CHR«(K< 
OUTPUT "Vous pc 

OUTPUT "Cantmr* 

OUTPUT"Modi f li 
OUTPUT ■ 
A««INSTP»M> it 



, 100, 160,3 
iv»z I ",30. 100, 2 
•r votre dessin.,. 



,30,00.2 
, 30 . 65, 2 
.30,43,2 



660 IF A' 1 
t " : G0SUB2 1 40 : GOT056O 

670 IF A=l THEN G0T0740 

680 PLOT 10.230,230.11,2 

690 OUTPUT "GREAT I ON DE DESSIN No ",30,228,1 

700 0UTPUTM1 , 180,228, 1 

710 SCREEN a, 213,230.215 

720 CLSlG0SUB"90 ' > red»5nln 

730 GOTO320 

740 NEXT Ml 

750 CK-0 

760 &0T0I940 

770 ' . •--. M I F I C A T . «*. 

780 CLSiCQLOft 0,2,4.5 

790 IF CT-1THEN OUTPUT"ATTENTIOM LE CHARGEMENT EST 

HAUVAIS". 10, I40,3iOUTPUT"R ECOMHENCEZ [ 1 
".40. 110,3iPAUSE 3iGOT01940 

800 IF CK-2 THEN OUTPUT"IL FAUT D'ABORO CHARGER UNE 

TABLE", 20, 120,3i PAUSE 3iGOTOI940 

BIO OUTPUT "VOULEZ -VOUS HODIF IEPi " , 40. 140, 1 

B20 OUTPUT"Tout» la tab]*. i I", 30, 110.1 

B30 OUTPUT'Un Saul d«»in i 2", SO, 93.1 

340 OUTPUT" Votre chol x . . I " . 30. 70, 1 

850 FOR NI-ITON 

860 Af -24347 iKA- 191 *NHADR-0&0O0 

870 GDSUB3270 

BBO NEXT 

890 «-.*- jur.fr- i' I) iA-VAL<A«> 

900 IF AM OR A>2 THEN L2-60i L2«-" I Ou 2 unlquBiwn 
t ■'Tr.0"UB214OiG0TOa9O 

910 IF A-l THEN G0T0I020 

920 CLSiL3 = 43iL4-120iL4»-"NLjn>ero du Hf>s-ir.i ..":G0 
SUB2220 

930 Nl-VALIAS) 

940 IFNI-0THENG0T0106O 

930 IF NJ N THEN U2-*0tL2»— [I 
■' OESSIN(S) "!GOSUB2|40iGOT0920 

960 CL5iCUTPUT"V0ICI LE DF.3T.lt 



• BUE"+BTB»(N)- 



(ex: Nombre de dessins, il taudra taper 02 si Ton veut 2 dessins, la 
validation sera aulomatique). 

Presente sous forme de "MENU", il suffira de choisir le numero cor- 
respondant a I'option desiree. 
Options particulieres: 

Si Ton possede les controleurs a mains, il est preferable de les utili- 
ser pour creer ses dessins. Si non. prendre I'option clavier. 
Avec le conlr&leur, le bouton sert a tracer les dessins. Pour effacer. 
repasser sur le point sans appuyer.. Pour arreler, il faut placer le 
curseur dans la case (1,1) c'est a dire en haul a gauche (ATTEN- 
TION: Ne pas passer par cette case, si le dessin n'est pas termine). 
On se deplace avec les lettres I.K.L.M. la touche A sert a tracer et 
la touche F a arreter le dessin. En cas d'erreur. dans le choix de 
I'option, il suffit de repondre 00 a la premiere question pour retour- 
ner au menu general. 

Pour pouvoir reutiliser ces tables sur cassette, il convient de noter 
les caracteristiques (nombre, nauleur et largeur des dessins) afin de 
dimensionner le tableau DES. Le mieux a faire est d'etudier en de- 
tail le listing de la partie "Modification". 



F Ht-'N- THEN GOT0920 

GOSUB 1 030 

GOTO 1940 

TABLE COMPLETE 

FOR Nl = l TO N 

GOSUB lOBO 

NEXT Nl 

GOTO 1940 
' <<< S/PRG MODIFICATION >>> 

WIPE i PLOT [O, 230, 230, 11,2 

OUTPUT-MODIFICATION DESSIN No ",30 

OUTPUTN1 , I80.22B. I 

SCREEN 9, 215, 230, 215 

FOR 1=1 TO X 

FOR J-l TO 01 

CC=DES( CNI-1»*X*I,J) :CI=CO 

FOR K=l TO B 

TAU,B«(J-l>+9-K>=CI-INT<CI/2)*2 

CI-INT(CI/2> 

NEXT K,J, I 
■FOR 1=1 TO X:FOR J = l TO V: PRtNTTA ( I , J 
NEXT 

Xl=5iYl=3 
CLS:G0SUB3390 

IF CHO-2 THEN GOSUB290O:G0T01240 

G0SUB2520 

G0SUB3 1 20 

RETURN 
* >>> SAUVEGARDE <<< 

CLSiCOLOR 0,6,4,1 

OUTPUT "Nombre de dessln^i ",35,140,1 

OUTPUT N, I7B-LEN(STR«(N) )«6, 140,2 

OUTPUT X, I7B-LENC5TR»(X) > t6, 120,2 
OUTPUT"L*rgeur du dessin: -.33,100.1 
OUTPUT Y, 17B-LEN(STR«<Y1 1*6, 100,2 



1210 

1220 
1230 



1270 
1280 
1290 
13O0 
13lO 
1320 
1330 
1340 
1.350 
1360 
1370 
I3BO 
1390 
1400 



1450 
1460 
1470 



1300 
1510 
1320 
I330 
1340 



IF X»="N" THEN GOT0194O 

WIPE 

PLOT 10,230,230,11,2 

DUTPUT-SAUVEGARDE DE LA TABLE", 50, 22B, 1 

SCREEN B, 215. 230,215 

I PREPARATION DE LA CASSETTE I* 



OUTPUT "ENFDNCER LA TDUCHE <REWIND> POUR", 20, 
OUTPUT-REM&OBINER LA CASSETTE", 40, 130, I 



•:RETURN> OUAND C'EST PRET",20,I0 



REMIND 

CLS 

□UTPUT"««t S A U 

OUTPUT "ENFONCER I 



'WRITE: ET-,20, 13 



At-INSTR»(1) 

0ES(0,O)-NiDES(0,ll»XiDES<l,0)' 

FOR 1-1 TO 2iSAVEIDESiNEXT 

GOTO 1940 
>>> CHARGEMENT <<< 

WIPEiCOLOR 0,4,7, I 

PLOT 10,230,230,11,2 
OUTPUr-CHARDEMENT DE LA TABLE- 
SCREEN 8.215,230,215 



160O N-VAL»A»1 

1610 IFN"OTHENGOT01880 

1620 SCREEN 8, 140,230, 140iCLS 

1630 L3=4SiL4=I40tL4*"-Hauteur du dessin! .."iGOSUB 
2220 

1640 X=VAL(A«) 

1650 IF X<INT(730/N) AND X<41 THEN GOT01670 

1660 L2-60lL2»»"DESSIN TROP GRAND" 1G0SUB21 40i GOTO 1 
620 

1670 SCREEN 8, 120, 230, 120i CLS 



690 



l_ _' - '1 ■". : 1 



=VAL<I 



■ 1201L4*' 






1700 IF Y/B-INT(Y/R) THEN GOTO 1 720 

17tO L2=30lL2«="MULTIPLE DE 8 S. V.P" I GDSUB2140i GOT 
01670 

1720 

1730 
670 

1 740 G0SUB2320 

17SO IF X*="N" THEN SCREEN B, 160, 230, 1 40iCLSl G0T01 
390 

1760 Dl-Y/8 

1770 DIM TA(X, Y> , OES ( X*N, Dl ) 

1780 WIPElPLOT 10,230,230, 11, 2lDUTPUT , 'CHARGEMENT DE 

LA TABLE'.SO, 228,1 

1790 SCREEN 8,215, 230, 215i OUTPUT" ■» ■ PREPARATION D 
E LA CASSETTE •••",15,180.3 

IBOO OUTPUT-ENFONCER LA TDUCHE <REWIND:- POUR", 20,1 
30. liOUTPUT-REMBOBINER LA CASSETTE" , 40, 1 30, 1 

1810 OUTPUr"TAPER <RETUPN> OUAND C'EST PRET",20,10 
0, ItREWINOiCLS 

1820 OUTPUT"!** CHARGEMENT III " , 35, 180, 3i 
OUTPUT "ENFONCER LA TOUCHE <rtEAD>" , 40, 130, 1 

1830 OUTPUT "POUR CHARGER". HO, 130. I 

1840 OUrpur-TAPER (RETURN > OUAND C'EST PRET",20,I0 
O, liA«-INSTR»(l ) 

1B50 LOAOtDES 

1B60 IF DES<O,0>'/N OR DEBtl ( 0)OV OR DESfO.DOX 
THEN L2-30!L2«-"ATTENT10N TABLE FAUSSE" I G0SUB2140iG0 
TO 1 890 

1870 CK-0 

1600 GOT01940 

imo r;r:r;n n n. ,-i -..:•-.-.. :•!'. 

1900 CLSiOUIPUT"V0ULE?-V0US RECOMMENCER", 35, 140,3 

1710 &0BUB2320 

1920 IF X*-"N" THEN CK-1 i G0T01940 

1 9 30 RUN 

1940 ' ;>-■>> n E N U 

1 950 COLOR O . 1 . / , 6 

1960 WIPE 

1970 PL01 45,230, 14*., 68, 2 

1980 OUTPUT" G ENERATEUR ",30,220, t 

1990 OUTPUT" D E ",50,200,1 



I E S ' 



2000 OUTPUT" C A R A C T E 
2O10 SCREEN 8,140,230,140 
2020 IF CHO^O THEN GOSUB2670 

2O30 OUTPUT"Cre*>' une table I 

2040 OUTPUT "Modi « If une tnble 1 

203O OUTPUT-Sauver un> table I 

2O60 OUTPUT "Cnarger un« table I 

2O70 OUTPUT-Votr* ctiol k * .70,30, 3 
2OB0 A»=IMSTR»<lliA=VAL(A»» 
2O90 IF A< I OR A>4 THEN L2-fcOlL2«"M 
" i &OSUB2 1 40 1 &OT02O8O 
210O DN A GOT0160.770.1260. 1340 
2110 



I -.40 


1 -■-.. " 


2". 40 


113,3 


3",40 


IOO, 3 


4-. 40 


85,3 



2120 
2130 
2140 
21SO 



s/prg i 



PLOT L2,22,LEN<L2«»*6*20.12.1 

0UTPUTL2».L2*I0,20,2 

PAUSE 2 

FLOT L".22,LEN(L2»)*6*20. 12.0 



2220 PLOT L3.L4*2,LEN(L4»)*6*20, 12.0 

2230 OUTPUTL44.L3*10,L4,3 

2240 CURSOR L3»LEN(L4»)*6-2,L4»l 

2250 A«=--i FDR 1-1 T02:X*=1NSTR»(I) :PRINT X« t lA*>A* 
*X4tNEXT 

2260 lFft*=-O0"THENG0TD228O 

2270 IF VAL(A»I=0 THEN L2-60:L2«»"Un chiHrt S.V.P 

" 1 GOSU82 1 40l &OT02220 

2280 RETURN 

2290 ' 

2300 ' s/prg confirmation 

2310 ' 

2320 PLOT 70.15,110,12,3 

2330 DUTPUT "CONFIRMATION 0/N",75. 1 3,2i **-]MSTR*< 1 } 

2340 IF X«0-0- AND X«< >"0- AND X«<>"n- AND X«<>"N 
" THEN GOT0233O 

2350 IF X4--o- THEN X*--0" 

2360 IF X*-"n" THEN X«-"N- 

2370 PLOT 70,15,110,12,0 

23SO RETURN 

2390 " 

2400 ' s/prq dessin grille 



2441 



NEX' 



XI, V 



2430 FOR J-O TO Y 

2460 PLOT 20»J«Y1.205. 1,X*Y1, 1 

2470 NEXT 

2 4 BO RETURN 

2490 ' 

2500 " s/prg r«*pllssage gri: 



2320 X2»INT(X/2)lY2-INTC 
2330 G0SUB2800IC-2 
2340 GOSUB3070 



2330 


M«-INSTR*{1) 


2560 


IF M»="a- THEN C-3i &OSUB3O70iGOT02S5O 


2370 


F C<>3 THENC-01GOSUB3070 


2580 


IF M»=-«- THEN X2-X2*liG0T02530 




IF M*-"i- THEN X2-X2-HGOT02330 


2600 


IF M«--j" THEN Y2-Y7-UG0T02530 


2610 


IF M»-"k" THEN Y2=Y2* 1 t &0T02530 


2620 


IF M*»"f- THEN RETURN 


2630 

2640 


G0T0233O 




2660 


• «/prg Choi), cl »v) er/c. *.«. 




2670 


OUTPUT-Clavler : 1", 70. 120,3 


26B0 


OUTFUT-Controleur.. i 2".7O,]05.3 


2690 


OUTPUT" Votre cholKt .-,70.80,3 


2700 


A«"1NSTR«<1) 


2710 


IF VALIASK1 OR VAL(A*)>2 THEN L2-6O1L 


2 un 


, quemen t " i GOSUB2 1 40: GOT027OO 


2720 


SCREEN B, 140,230,140:CLS 


2730 


IF VAL<A«)-2 THEN CH0»2:GOT02730 


2740 


CHO-1 


2750 


COLOR 0,4,6,2 


2760 


RETURN 


2770 






2780 


s/prg verif lt»ites 


2790 






2800 


IF X2<! THEN X2-1 


2810 


IF X2>X THEN X2-X 


2820 


IF Y2<1 THEN V2= 1 j 


2830 


IF Y2>Y THEN Y2-Y , ^t 


2B40 


IF CHO=l THEN G0T02CI6O » A4T 


2850 


IF X2-1 AND Y2-1 THEN TIN=1 - /^ 
RETURN W AfJ 




2870 






28B0 


s/prg renpl ls5.iqi> c.i.m. ^_ ^ 


2B90 




2900 


X2-INTIX/2) 1 Y2-INT(Y/2) 


2910 


FIN-0 



2920 G0SUB2B00 I C-2 

2930 GOSUB 30 70 

2940 IF F1N-I THEN RETURN 

2950 SOUND 0,600O0lPAUSE. 1 : SUUND O.4096 

2960 IF FIRE<0>-0 THEN C=3iGOSUB3070 

2970 IF C<>3 THEN C-Ol &OSU03O7O 

2980 J-JOY(O) 

2990 IF J-l THEN Y2-Y2-1 i GOTD2920 

3000 IF J-2 THEN Y2"Y2*1 tG0T02920 

3010 IF J-4 THEN X2-X2-1 I GOT02920 

3O20 IF J-B THEN X2-X2* I i GOT02920 

3030 GOT02960 

3040 ' 

3050 ' s/prg dessin case 

3060 ' 

3070 PLOT 16*Y2«Y1,209-X2*XI,4,4,C 

3080 RETURN 

3090 ' 

3100 ' s/prg codification 

3110 " 

3120 iPRINTCHR»(7) i PLOT 10,230,230,11,2 

3130 OUTPUT"VeuiI 1 ez patlontRr quelqueh 
10,228,3 

3140 FOR 1-1 TO XiFDR J-l TO Y 
3 1 30 TA < 1 , J ) -0 

3160 IF POINT< t9»J*Yl,206-I»Xl>-3 THEN 

3170 NEXT J.I 



318) 



FOR I- 



TO 1 



3190 


FOR J-I TO 01 




3200 


DES( fNl-l)«X+l,J)-0 




3210 


FOR K-I TO 8iDESUNl-l>*XH.J 


1)1 •;< ( 


J) *T( 


<I,B*<J-1>*9-K>#2~(K-1) 




3220 


NEXT K.J, I 




3230 


RETURN 




3230 


s/prg entree «w«olr» 




3260 










3270 


R1-INTIA0R/2361 i R2-ADR-R1 «236 




3200 


POKE ADR.XiPOKE ADRH.Y 




3290 


ADR-ADR'2»X«I)1 « (Nl-I) 




3300 


FOR I-(N1-1)»X*1 TO (N1-1KX*: 


■ FOR J 


3310 


POKE ADR.DESd.Jl 




3320 


ADR-ADR»1 




3330 


NEXT J, I 




3340 


POKE AK.l.RliPOKE AK.R2 




33SO 


RETURN 




3360 






3370 


s/prg modifications 




33HO 










3390 


G09UB2420 




3400 


FOR 1-1 TO XlFOR J-l TO Y 




3410 


IF TAU.Jl-t THEN PLOT I6*J*V 


, 209- I 


3420 


NEXT J, I 




3430 


RETURN 





DEUX SUPER-CONCOURS PERMANENTS 

1 000 francs de prix au MEILLEUR LOGICIEL du MOIS et un VOYAGE EN CALIFORNIE 

au meilleur logiciel du TRIMESTRE. 



Un concours de plus ! 
Rien de bien original dans cette 
formule. pourtanl nous es- 
sayons de (aire quetque chose 
de different : nous organtsons 
un concours permanent tous 
les mois el tous les tnmestres ' 
E t avec des prix dignes des pro- 
grammes que »ous allez nous 
envoyer ! 

De plus, ce seront les lectevrs 
eux-memes qui voteront pour 
leurs programmes preteres sur 
la grille recapitulative men- 
suelle. 

Pas de Jury, pas de decision at 
bit r aire. HEBDOGICIEL n'inter- 
Tenant que dans le chotx des 
programmes qui devront etre 
ORIGINAUX et FRANC AIS Si 
votre programme n'est pas tout 
a lait au point, un de nos spe- 
cialistes vous dira comment 
lameliorer pour pouvoir nous le 
proposer a nouveau. 



Pour participer. il vous suftil de 
nous envoyer vos programmes 
accompagnes du bon de parti- 
cipation ainsi que toutes les ex- 
plications necessaires a ('utili- 
sation de ce programme. 
Bonne chance! 



Reglement 

ART l HEBDOGICIEL organise 
de (aeon mensuelle et tnmes- 
toelle un concours dole de prix 
recompensant le meilleur logi- 
ciel du mois et du Inmestre 
ART 2 Ce concours est ouvert a 
tout auteur de logiciel quelque 
soil le materiel sur lequel il est 
realise L'envoi dun logiciel en 
K 7 ou disquetle accompagne 
d'un bon de participation de- 
coupe dans HEBDOGICIEL ou 
envoye gralmlement sur de- 



mande par la redaction de notre 
journal constilue lacte de can- 
didature 

ARTS La redaction d'HEBDO- 
GICIEL se reserve le dtoil de 
seleclionner sur !a base de la 
quahte et de I'onginalite leslogi- 
ciels qui son! publics dans le 
journal 

ART. 4 Ce sont les lecteursqut, 
par leur vote, determinent les 
meilleu/s logiciels mensuel el 
trimestnel 

ART 5 Le prix alloue pour le 
concours mensuel sera remisau 
plus tard un mois apres la do- 
lure du concours mensuel 
ART 6 Le prix alloue pour le 
concours Inmeslnel sera remis 
au plus lard un mois apres la clo- 
ture du concours Inmestnel 
ART 7 Le present reglement a 
ete depose chez Maitre Jauna- 
tre.l.ruedesHalles7500l Pans 
ARTS HEBDOGICIEL se reser- 



ve le droit d'interrompre a tout 
moment (e present concours en 
en avisant les lecteurs un mois 
avant 

ART 9 La participation au con- 
cours entraine I acceptation par 
les concurrents du present re- 
glement 

HEBDOGICIEL: 27. rue du Gal 
FOY- 75008 PARIS 

Sera declare gagnant le pro- 
gramme qui aura obtenu le plus 
fort pourcentage de vote par 
rapport a la totalite des pro- 
grammes recus pour un meme 
ordinateur. 

Ainsi. pas de favoritisme pour 
les ordinateurs plus puissants 
ou tres diffuses. 



BON DE PARTICIPATION 



Nom . 

Pre nom 

Age Profession : 

Adresse . 

N^ 1 telephone : 

Nom du programme 

Nom du materiel utilise : 

declare etre I auteur de ce programme qui nest m une imitation n> une 
copie d'un programme existant Ce programme reste ma propnele et 
j autorise HEBDOGICIEL a le puWter La remuneration pour tes pages 
publiees sera de 1000 francs par page (un programme n'occupant pas 
une page entiere sera remunere au prorata de la surface occupee) 

Signature obligatoire : 

(signature des patents pour les mineurs). 

Le programme doit etre expedie sur support magnelique (cassette ou 
disquette) accompagne dun desenp tif detaille du m atenel utilise, 
dune notice d 'utili sation d u prog ramme . Les supports des program 
mes pubties sont con seryesTn'oubliez done pas den (aire une copie 



RECOMMANDATIONS AUX LEC- 
TEURS GUI SOUHATTENT FAIRE 
PUBLIER UN PROGRAMME : 

• Envoye* vos supports, mode 
demploi. listings et bon de parti- 
cipation dans une meme enve- 
lope. 

Vous pouvez nous envoyer plu- 
steurs programmes sur un meme 
support en lindiquant sur voire 
Bon de Participation 

• N'oubdez pas et ceci est tres 
important d msenre sur vos sup- 
ports votre nom. le nom du pro- 
gramme et le materiel utilise. 
Notez dans les premieres dgnes 
de voire programme, sous forme 
de REM. votre nom. le nom du pro- 
gramme eMe ma tenet auquelil est 



destine Nous pourrons ainsi re- 
perer facilement les listings, une 
fois sortis de Timprimanle 

• Dupliquez plusieurs fois sur la 
cassette et a des niveaux d'enre- 
gistrement diflerents votre pro- 
gramme Nous aurons plus de 
chance d'arnver a le charger si les 
magnetophones ne sont pas tout 
a fait compatibles 

• En ce qui concerne les bons de 
participation, mettez voire adres- 
se complete el votre numero de 
telephone (si vous en avez un) 

• Pour tout envoi tel que "petiles 
annonces". "abonnement" et 
"programmes" specifier sur vos 
enveloppes lobjet de votre cour- 
ner 



• Expliquez les particularity de 
voire ordinateur et le moyen 
d adapter votre programme a 
d'autres ordinateurs 

• Vu le nombre important de pro- 
grammes similaires que nous re- 
cevons. evitez de nous envoyez 
les jeux suivants : BIORYTHMES, 
MASTERMIND. PENDU. TOURDE 
HANOI, CALENDRIER, BATAILLE 
NAVALE. POKER. JACKPOT. 
BOWLING, BLACK JACK. LABY- 
RINTHS. MEMORY SIMON. 421. 
OTHELLO. SOLITAIRE. LOTO 



LA REGLE A CALCUL RE- 
COMPENSE LES MEILLEURS 
LOGICIELS EN OFFRANT A 
CHACUN DES PREMIERS 
DANS LEUR CATEGORIE UN 
OUVRAGE A CHOISIR DANS 
SON RAYON LIBRAIRIE (EDI- 
TEURS : BORDAS, DUNOD, 
EYROLLES, MASSON, NA- 
THAN, PSI, SHIFT, SYBEX). 






SOUIRELLE RECOMPENSE LE 
MEILLEUR LOGICIEL DU MOIS 
PAR 2 CASSETTES A CHOISIR 
DANS SA LOGITHEOUE. 


Les editions du CAGIRE offrent 
au meilleur logiciel du mois sur 
HP 41, leur livre "autour de la bou- 
de" de Janick TAJLLANDIER. 





RECOMMANDATIONS 
PARTICULIERES 
AUX POSSESSEURS DE 
TRS 80 

Indiquer avec precision le mo- 
dele dordinateur auquel le pro- 
gramme est destine Si le pro- 
gramme est enregislre sur 
cassettes utilise; ototigato<re- 
ment la Vitesse de 500 bands, 
meme sur un modele III. 
Dans tous les cas ou le pro- 
gramme est enregistre sur cas- 
sette il faut avoir utilise la Vi- 
tesse de 500 bands et non, en 
particulier. la vitesse de 1500 
bands du modele III. 



Date limite d'envoi du bulletin de vote le 
Jeudi 4 Octobre a minuit. 





N°46 


N°47 


N°48 


N°49 


APPLE II 


FIGURINES 


BLOCKHAUS 


STOP BALL 


FOURMIUERE 


CANON X-07 


PRIX DU DANGER 


GENERATEUR 
MUSICAL 


FONTS 


PISTE 


CASK) FX 702-P 


MINI-GOLF 


PILOT 


ALIENS 


LINEARISATION 


COMMODORE 64 


SONS 


PILULE 


HELICOPTERE 


CHRONOPOLIS 


COMMODORE 
VIC 20 


PROTECTEUR 


GLOBUL 


PTIT MONSTRE 


ENVAHISSEURS 


HECTOR HR 


GEOGRAPHIE 


ALUNISSAGE 


SOLITAIRE 


PARACHUTISTES 


HP 41 


FONCTIONS 


ASS/UM 


CROSSY 


BULLET 


MZ 


YAMS 


YAMS 


MUSIC 


GLOBULE 


ORIC1 


SPIES KILLER 


PARADISE 


EKIBRI 


PORTRAITS ROBOT 


PC 1251 


FICHIER TEL 


TRESOR DU LAGON 


DEPENSE 


RALLYE 


PC 1500 


UTILFORMES 


BUCK ROGERS 


BATTLE CARS 


DAO 


SPECTRUM 


DEMONIAK 


ISOLA 


SHARK-MAZE 


DEAD ZONE 


ZX81 


SPATIO JEEP 


SEIGNEUR DES ANNEAUX 


BILLES 


SOUSMARIN 


TRS 80 


GESTION 
FAMILIALE 


MILLES BORNES 


MUTANT 


OVNIS 


Tl 99/4 A 

(basic simple) 


DEDALE 


PANORAMA 


REUSSITE 


SOS HELICO 


TI99/AA 

(basic etendu) 


SABRE LASER 


PILOTAGE 


KONG - BERT 


DEFENSIVE 


TO 7 


SPACE FIGHTER 


GOLF 


MANIAC 


GRAPHIOUES 



AUX URNES ! 



Abandonnez quelques instants vos claviers et prenez 
votre plus belle plume pour remplir le bulletin de vote 
ci-contre. La redaction d'Hebdogiciel compte sur vous! 
La marche a suivre est simple: 

- Reperez dans la grille ci-contre le programme pour 
lequel vous voulez voter ainsi que eelui pour lequel 
vous votez en second (le second nous permettra de 
rendre plus equitable la formule de choix du gagnant). 

- Reportez te nom de ces deux programmes sur le bul- 
letin de vote. 

- Inscrivez vos nom et adresse sur le bulletin de vote. 

- Expediez-le a HEBDOGICIEL, CONCOURS MEN- 
SUEL. 27 rue du General Foy, 75008 PARIS, avant le 
jeudi 4 octobre a minuit. 

II est fort probable que ceux qui participent au 
concours feront voter leur papa, leur maman. leur cou- 
sine et la totalite de leurs amis et relations pour leur 
programme. Normal! Mais chacun deux fera la meme 
chose, cela n'est pas bien grave ! Toutefois. toujours 
dans un souci d'equite, nous n'accepterons que les 
ORIGINAUX; pas de photocopies, cela serait trop facile 



BULLETIN DE VOTE 



A renvoyer avant le 4 octobre minuit a HEBDOGI- 
CIEL, concours mensuel. 27 rue du General Foy 
75008 PARIS. 

JE VOTE POUR LE PROGRAMME SUIVANT : 
NOM DE LORDINATEUR : 

NOM DU PROGRAMME : 

JE CLASSE SECOND LE PROGRAMME SUIVANT : 
NOM DE LORDINATEUR : 

NOM DU PROGRAMME : 

NOM ET PRENOM : 

ADRESSE : 



NOUS POUVONS VOUS 
FOUflNIR TOUS LES LOG!- 
CIELS DE CETTE PAGE A UN 
TARIF PREFERENTTEL N HE- 
SITE2 PAS A NOUS CONTAC- 
TERAU:16(1]2W 28.50. 



DEMANDEZ LE PROGRAMME 

Achetez vos logiciels les yeux fermes, nous les avons testes pour vous ! 




Ibles en France. Nous ne 






Nous avons aeiectlonne pour t-ooa les meltleurs logiciels actuelloment dlspoi 

pretendons pas Que cette lisle est complete et definitive et II est evident que 

llerement des programmes au lur et a mesure que noun les testerons. Pourtont, vou» encrcherei 

vain certains programmes qui jouissent d'une bonne reputation et qui se vendent surlout grace n 

publlclte et aux consells des vendeurs qui ne peuvent pas connallre fous les logiciels disponing 

Nous avona classe a port lea logiciels mducatlls et. par soucl d 'bonnetete. nos propres produits le 

Hebdoglclel Software 

Lesprlx sont, nous f'ospdi 

- qui beneltclani 

rlenco nous 

robjectlf qui 



*& 




1 
1 


::;:::;::; 




niiP'lll 




v,::;:v 


1 

1 


l * H ill MIS 


-..-■■ 


'.. 




iMx 












I 












• |L<M 


H0N1AH1 






1 










'H50 



JUMP 



CANON X-07 



Dure epreuve pour aujourd'hui... En eflet. il va s'aojr 
pour vous de grimper sur des escaliers roulants pour 
desamorcer une bombe qui ne demande, bien sur, 
qu'd exploser pour vous transformer en chaleur et fu- 
miere. Attention!!! On perd rapidement des points et de 
plus, il s'agit daller vite... 
Un jeu tres prenant, en trois tableaux. 

Fred TRANCART 

Mode demploi: Apres avoir execute un RUN le programme se pre- 
serve Vous pouvez aussi eviter le genenque en pressant la touche 



RETURN'. Vous devez ensuile, choisir voire niveau Si vous optez 
pour le premier, vous aurez deux fois moms de temps quavec le 
niveau normal. 

Lorsque vous reussissez le saut. vous gagnez 10 ou 20 points, 
seton la difficulty du niveau. Par contre. si vous echouez ou si vous 
tombez dans un trou, vous perdez 30 points et ceci. quelque soit le 
niveau de jeu. 

A la fin de lepreuve. vous avez droit a un bonus qui augmente au 
fur et a mesure que vous reussissez a chaque elage. 
De plus, pour prendre en compte la rapidite du joueur. le temps 
resiant esl aioute au score tolal a la fin de chaque etape. 
Enfin. si vous avancez vers lextremite gauche, vous vous retrouve- 
rez a droite. Je vous laisse done decouvrir le true pour desamorcer 
rapidement la bombe... 




82 Aeut 1984 

1 >t.o TRANCART 



: ■ 

■.■.-.:.■■.■ 

!* font.(]34) = 8,8.0,0.8,0,0,252' 

is «0Nt*ci?e)= "tHee,LH!e,tK2e,iH33.iri?e, 

'.>tae.i.Hie.iMJ8.i«54,iM3a, 
tH?e.iH?e.i.H0e- 

50 FONT»Cl36)-"8, IB, 48. 18. 89,84, 124,252" 

a. i^.ia. iSise. a*. )24,e- 

-8 F0NT«r!371«' 16, 124, 16,56,68.8.0,252-: 

15. 124. 16, 56, 68, 0,0.0- 
50 FONI4I 138)- iH0e,ime,tH30,tME9,S,H28, 

^.IMFC" 

55 F-ONr§( i J?) - ■ twee, tH«e, ih39. iheb, tH28, 
i^e.tMe.iMae- 

58 FONT*(:33) = "S.H80.tM83.t.M30,*H5C,t.H18. 

lH28.<.M*8.tHFC 

'."30 , x M08. 4N38. IH5C , tH ] 0, 
-■-i.*M88- 

61 fONttn<0]T- 12,16,128.228, 188.252. 12? 
. : 

62 CL tftt 380 
53 ^-108 

=>RES£NIATION 
?8 USiSJ 

72 L0CATE4, J :PRJNTFRED TRANCART " , " 

73 GOSUB21800:C1.S 
75 FORFM2T06STEP-2 
88 FORG^0TOF 

8? IFINKET«<> THEN97 

85 LOCATED. 2 iBRINTCMRttl 28) *rtiD«C8«,(F-4 

?0 BEETtij. ?:tORH = ! TO30:NEXIH:LOCATEG,2: 

: MfXIG 
91 MEAT? 

•. , 0I7STEP2:CIRCLE(FI5*-8. IS?,S:*C 

xr 



38 :fc£rr "0' )rMEN26880 

9S : F i m-e t r n')ThEn188ELSE98 

188 CLS:=R[Nr-Ou S i ruvt«i","elM> ii 

out ?" 

■T'l R*P.d*"."2 Noc«o|-: 
I 37 1FTKETC fJTHENNI" 1 :W)T0185 
!"ENNI-2:&OTO105 
*'J|02 

Si ncnrEJ.8-*PR[MT-pr«i.,»r , 
■ ■■ " 

OCATEB, 2:PRlNT"L'««e«lr.r m 
'•ui m«z-]MI*30;' ik, ; 
115 GOSUB71008 
128 G05U827888 
130 CLS:«)SU822000 

i» FO»r=Ni»38ro0srEP-i 

■ -.-■■■ ■ ■•'■■ MlSfl 



iFRum 1 ]>.8fHEHR*-' 



LSEB*'CBH»C131 



155 A*-RJGHT4(A»,58HB« 
169 LOCATE!, 8:PHINTfl*i 
1B7 LMAIEB.SiPRINrriLOrrtTtlO, 

165 &asue400 

(78 NEXTT 

175 GOTO 3000 

!80 r.L:: :PR INI "Bravo, WflU* ivll ^aon. 

call* PT*ni*re»iaPo. ..BONUS"! 

185 IFNr=ir»EN9=20eELS£8=l8e 

190 PRINTB:S'S»B*T 

195 FORF^38T08STEP-2:BEEPF, 1 :N£XTF 

280 GOSU821088 

285 CLS:LOCfl!E3,0:PRlNr-S«cor.d *tao»":GO 

511628880 

218 LOCATES, 2:PRlNT"L'e>c»li«r <t*tc*nd 

*. uoui »v*i* jNl«38;".«e.*i 

212 GOSU821800 

213 G0SU827888 

214 CLS:GOSUB22000 

215 FORT=NI*38TOeSTEP-1 

216 ifT=e«Nox<=irHEN25a 

228 !FRN0£I)>.8THEN8»--' ■ ELSEB4=CHR*C 1 54 

) 

225 A»=B*'LEFT»(A*,5B) 

230 LOCATEl,8:PRINTA«; 

235 LOCATE8,3:PRINTT;:L0CATE18.3:PRINTS; 

248 G0SU84B8 

245 NEXTT 

246 GO I 03889 

250 CLSlPRIMT'Uout tt*i vraiT,»ni un AS. 

..BONUS"; 

252 IFNI=lTHEN8=388ELSEB=15e 

254 PRIHT9:S=S»B*I 

255 F0RF=38'08STEP-2:BEEPF,1:NEXIF 
268 G0SU821888 

265 CLS:LOCATE2,8:PRINT"Troit icme »ta««" 
:GOSUB20000 

267 LOCAr£0,2:PRINT"L« ■tctmiM est a 
»r«*«rrt ai.airj .r.- : :GOSUB21800 

268 CLS:PRINT"Et ■'••Call** eeul «0 It m 

270 PRININII68;" t*c . " ; :&OSU821088 

275 GOSUB27000 

288 CLS:GOSUB22880 

785 FORT NII60TO8STEP-I 

298 IFT=8«NOX<-irneN389 

295 IFRN0<U>.8THEM8« = '- -£LSEB«^CHR«(1 34 

1 

388 IFRN(HI)>. J THENAt=RIGHT*rA»,58)'B«EL 

SEAf =BI <LEF r » f ft» , 58 1 

305 LOCATE!. 8:PRINTAt; 

318 LOCATE8,J:PRINTT;:LOCATEI8,3;PRINTS; 

315 GOSUB408 

320 NEXT! 

325 GOI03889 

388 CLS:PRINT"Uout Hm vnv< a t« lin 



at 



,rt ii 



385 PRINT" BONDS"; 

386 IFNl = irHEN8 = 408EL^EB^790 
187 P»INIB:S=S*B*I 

388 FORF-38TOBSTEP-1 :8EEPF,1 INEXIF 
398 ryj',u97i0e8 
394 G0SltB25888 

396 CLS:l.0CATE8. 1 :PRINT'Cont -natr vout f 
our wtwnl.f CI ir,r, ?", 

397 IFTKETf"0")THEN189 

398 IFTKETf "N" irHENCLSiENO 

399 G0T0397 

1^0 O '.r.fEtfKX. r):lFrr>3ANOOri34InENG0SlJ 
82808 




500 ST=St JCKC0) 

518 lF5T = tANOTO8THEN680 

•520 IFSI^7IHEN799 

518 IFSTOIHEN808 

535 L0CftrEX.l:B--SCREEN(x,T) 

536 lFTO3ftNOB<!34TH£NGOSU820ee:PEIURN 
548 IFT=JTHENPRINTCMR«(129) ;ELS£PRJNICHR 
tll35); 

545 RETURN 

680 LOCAIEX,T:lFr^3THENPRINTCHC*U3! >JEI 

SEPR[nrCHR*tl371; 

60S G0SU6 18080 

518 B=SCREENtX,t-l):iFB^321HEN650 

628 S=S-38HFS<=0TMEN3000 

630 LOCrirEX.T: [FT = 3THENPRINTCMR*(138);EL 

SEPRINTCHR«'136); 

635 GOSU812B88 

640 RETURN 

658 IFNI = !THENS*S'-2eeLSES=S*ie 

668 LOCAlEX.lr ;IFT--3TMENPW1NTC^'^^ 

EPRINTCHft*(l34) ; 

678 r.T-1 

688 L0CATEX,t:PRInTChr«(129) ; 

685 G0SU9 13080 

690 RETURN 

708 BEEP58. 1 ilOCAIEX, T ! IFr-JlMtNPRINTCMR 

• t32);:tiorO7i0 

705 lFSCRE£NCX,n<134THENPRlNICHR»(52);E 

LSEPR1NTCMR4C134); 

718 X«X-1:1FX'-1THENIFT(.>3TMENX-19ELSEX' 

IB 

720 LOCftTEX.Y 

738 B=SC«EENfX,T) 

735 !FT-3THENPRrHTCHR«(l37);:RETURN 

740 IFB>=134TMENPRlNTCHR»t 138); :RETURN 

758 PRINrCNR«tl52) ; IG0SUB2888 iRE 1URN 

880 BEEP3B. 1 :LOCATEX, r : 1FT-3TMENPRINTCHR 

8(321 ;>GOT08ie 

805 IFSCREENCX,TX134THENPRINTCHRI(32);£ 

uSEPRINTCMR»C134); 

810 X-X'l :lF(X-19ANOr-3)0R(X»28ANOT<>3)T 

HENX-0 

928 LOCATEX.Y 

938 B^CREENCX.T) 

B35 lFr=3THENPRfNTCMR»tl33);:R£TURN 

849 IFB>-I34TmENPRINTChR*(139)1 :RETU«N 

958 PRINrCHR*(133);'GOSU82000:R£TURN 

2000 S>S-38iIFS< = 0rrtEN3808 

2818 L0CATEX,T:PRINrCnR«(32); 

2828 Y=YM 

2825 lFT-3ANOX^I9THENX^lB 

2820 LOCAIEX.Y 

2838 IFY-3INENPR1NTCMR4C 138) ;:60SUB1 1008 

-L0CArEX.Y:PRlNTCHR«(l29);:RETIjRN 

2848 B'SCREENtX.Y) 

7050 LOCAIEX.Y 

2060 lFB I 32IHENPRINTCHR*t 130) 1 :&0SUB1 188 

B I60T030M 

7370 PRINrCNR»(136)::&OSUBU000:LOCnrLX, 

YiPRINTCMRtt 135); iRETURN 

3888 r0RF-tT0U9STEP3:CIRCLE(3,4),F rBEEP 

18B88«3«F, 1 iNEXT 

3818 O-SiLOCATEe, t :PRINI"0«io le vsui *v« 

3628 FORF^38TO0STEP-2:BEEPF, I INEXTF 

3030 GOSUS 25000 

3040 CLSH.0CftTE8,I:PRINr'Uo u l./ vou« r.I 

a;r. un « nutrt p.il;. ?' 

S0M H TKErt "0")7HEN63 

3060 IFIKEYt'N' 1IMENCLSIEND 

3870 G0I03858 

18980 ■ BRUII SAU' 



18108 BEEP5.1i9EEPI8.7;B€EPA8.-' 

18158 Gosuezeeee 

10280 RE1URN 

11800 ' BRUIT CNUTE 

11188 8EEP3B.5:Be£PlB.2iBEEP5.1 

1U58 GosuBzeeee 

11200 RETURN 

12088 ' BRUIT BANG 

12180 BEEPS, 1 

12150 GOSUB28808 

12288 RETURN 

13800 ' BRUIT BING 

13188 BEEP30.5 

i3i5a GosueTeeee 

13200 RETURN 

28888 'PAUSE COUftTE 

28818 F0RF-iI0?8e:NEXlF:RETlRN 

21880 'PAUSE LONGUE 

21188 FORF-lI0888iNEXI:R(:luRN 

22880 'AM.cnt sraah 

22100 X-18:T-3:LOCAtEX,Y:PRINlCHR4(l: 

:BEEP38.5:G0SU82eeee 

23829 At 

23030 LOCATE!, 

23058 F0RF-1TO59 

23968 1FRN0(1)>.HTMENA«-Af- 'EtSCM 

fNR»t!34) 

23862 BEEP2*lFn0O28),I 

23865 PRlNlnl04CA»,F,l); 

2307B NEXTF 

24100 LOCATEa,0:PRlNTCnR>ri48) 

24788 8EEP3I,5 

74308 RETURN 

2^800 ' Scor* 

25180 CI-SaOCArE0, I :'*RINr voir* itot, 






i ' ;S; 



25150 GOSUe 20800 IG0SU8 7008ft 
25280 IFS<'HSTH£N25580 
25218 CLSIL0CATE8, 1 iPK'INI' Uo, 
anci»or#cori1 d»" tH$l*»« l«l#" I 
75156 HS'S 

25278 GOSU87088e:GOSU82e0ee 
25508 RETURN 
76800 'R*4l». 

2fi01« rL^:'>RINT"Uout carl*/ t 
ai a dre.l*" :frf)SIIB21 989 
26828 CI.S'PR|NT-Et vout d*vtl 
»orc«i la bo«bc •" hnul a |U 
■■ ,'-.' ..: .i:n,'U!Hi! 
26848 CLS:PRINT"P 0u r c*ln vol 






; ,ioit* 



tt,. 



■i.;u", i,-i .i n/n<mi 

26090 CLSiLOCATEB. I :PRINT>>> BONNE I 
CE <« a i60SUB2teM 

?r,77fl OOfOlM 

77080 * OrilNTh 

Z78S8 'i BJLOCATE0, 1 if»RINT"Pr«i*«l um 



77101 



IFINKET»* , " , T,lf.fl7 7|«nl I -I kl lllh'M 



LE SECRET DE LA MOMIE 



\^f Suite de la page 5 

7610 CLS GO SUB 9-S7B 

7B11 CL8 PPINT «T 3,3,*'je MOfFT 

E L C5CRLICR- BCeP .006,6 Pfi 
USE 68 PRINT PRINT PRINT 

PRINT PRINT POINT " J ' BR 

PIUS 00U\ UNE PIECE... ■■ BCEP .8 
Q?, 9 PAUSE 108 
7815 CLS RETURN 

3350 CL5 

6108 fJO SUB 7800 10 SUB 7460 <i 
SUB 3969 GO SUB 4550 LET Nl* 
INT LRND*a)*l LET N2>IMT 'RH0»6 
••1 LET N3»IMT IPH&.58I .1 

ai*a plot 252,131 oppiu -17,8 

P&U 8,-35 C'Pfi'J 17,0: ORAU 8.37 

(.ET P.P-a IF P-2 THEN CLS 00 

TO 3858 
81*5 If Jfi-12 THEN LET JR»13 
S158 00 SU6 395* 90 SUB 39*0 G 
O SUB 4 100 

915L IF CT«1 THEN uQ SljB *50« 
5152 If 6E-1 THEN GO SUB *050 
6153 I' fEV.l THEN -iO 5U8 4300 
3160 If RN«PIE PNO 6E«0 THH" PP I 
NT «T 8.28, '■ RAybll «St ' . ftT 1,20 
." d»ft* l»",BT 2,28, P.*t« N " 
. FL«3M 1, INK 2, AH INK 6 ("LAS 
H BEEP .08.28 8EEP .89,20 & 
TO *138 
9170 IF »N.PIE AND BE«1 THEN LET 

BE-0 PRINT AT 0.28." Anubii •* 
f.AT 1.28.- 4*AS '.»' .AT 2,28, " 

PitCI n ■' . PLASM 1, INK 3, RM I 
UK 6 FLASH BEEP ,98.20 BEEP 
.06,20 PAINT AT 28 ,0, ■hEUAEUSE 
MENT uijE J--.OT 21,9, A'JAIS L An 
ULETTE.,.'- PP.U5E 90 GO SUB 555 
3 PRINT AT 28,0. "MAINTENArlT JE 

n'en'.ot 21.9.' n ai plus... p 
ruse 59 co sub 4060 

8196 PRINT AT 0,20,- Anubi* «tt" 
.AT 1,20." 4*fit l* 1 .AT 2,28, " P 
t«C« H ", INK. 3.AU INK ft 
4289 PLOT 162.175 ORAU 0,-2? 
PAU 93,9 ORAU 8,27 AETUAN 
6296 LET TEL i65536tPECK 23674.2 
36»PEEK 23v73.PCEK 216721/30 
6206 CO SUB 3533 BEEP 0.08,8 I 
NPUT 01." Que PAIS-UE •> . LINE 



A« BEEP 8.005,19 BEEP .003,10 
3219 LET TE2. r65535>PECK 23674.2 
56#PCEK 336734PCEK 236721/30 
9213 IF TE2-TE1>*45 TMEN PRINT A 
T 28, 0J , '■MALMEUREUX* « UOUS AUEI"; 
AT 21,0, ■ 0EPA5SE LE TCMPS...". 
PAUSE 188 CLS PRINT PRINT 

PRINT PRINT " flnubit VOUI 



_. IF P(>2 TNEN GO TO 3B30 
6229 IF Pi-"" TMEN CO TO 8206 
9980 IF Rfi'OES" AND HT < • 1 ANO P 
IE '.21 TMEN GO TO 6206 
9001 IF R*» &ES ANO CT«1 AND PI 
E*2l THEN 00 5U8 9370 
9882 IF Rt-'-OES" AND PIE-21 ANO 
HT ■ , 1 TMEN GO TQ 6206 
9003 IF Pl< ■ OES TMEN GO 3UB 937 
8 

9088 IF LEN R«<7 OR LCH R8>7 TME 
N GO TO 6206 

9909 IF P*I41 «>" - TMEN GO TO 92 
86 

9028 IF A« 1 TO 3) ■■'SOU" THEN CO 
5U6 9209: 10 TO 8296 
9839 IF 0«i TO 3) ■"PRE" YHEN GO 
SU6 9238 00 TO 8286 
9932 IF At I TO 3) ."OUU" TMEN 10 
SUB 9100 GO TO 9206 
9868 IF P»( TO 3r<>"0UV" ANO fit I 

TO 31 ' >"SOU" AND Rt 1 TO 31 O'PR 
B" ANO R«l TO 31 < i"Gl!S" OR R*.."'* 

TMeil GO TO 8206 

9108 IF Pt(* TO 71 »" POP" THEN C 
SUB U900* IPIE»1001 .30) Rerun 

9109 IF Rfl* TO 71 ■" CQF" ANO CO 
F-l ANO PIE>21 AND CT«0 TMEN 6EE 
P .08.20 BEEP .06.20 PRINT AT 
20,0, IMPOSSIBLE IL FAUT'-.RT 21, 
0, "LA CLE DU TONBEAU. PAUSE 10 

RETURN 



.08,20 BEEP .06,20 PAINT 
20,0, "IL Y A UN PASSAGE SE - " , AT 
21,0.'-CRET DANS LE COFFRC'" PA 
USE 100 AETUAN 

9111 IF Rfl* TO 7) •" COF AND CO 
F.0 THEN GO SUB 5333 GO 3U8 738 
RETURN 



F«l TMEN 1 
9 RETURN 

9130 IF Rat* 

1.1 TMEN GO : 

09t(Pie»i0oi 

9131 IF A* I* 
1*0 TMEN GO : 

RETURN 
9200 IF Piii 
P.l TMEN GO : 

8t iPiEtiaei *. 



sue 3S5S: go : 

< 71 ■" BOI" 
5555 GO I 
) RETURN 

. 71 -" BOI" 
5335 00 : 

7) «" TAP' 

3353 GO 
PAUSE 58 



ANO Tfi 
SUB 190 
RETURN 



£Z DEJA UNE..' PAUSE 59: RETURN &RAU 8,-3- PLOT 103,83 



P-0 TMEN GO SUB 3555: GO SUB 733 
RETURN 

9230 IF Rfl* TO 7} ■" TRA" ANO TR 
AP*1 RNO PIE-22 OP PIEi24 TMEN C 
L3 PRINT INK 3, AT 3,*, "MALHEUR 
EUX'i-.AT 7,*, "UNE OUBLIETTE..." 

PAUSE 100 GO SUB 9965 

9231 IF Rfl* TO 7) «•■ TRA" ANO TR 
AP*1 ANO PIE>26 ANO M0U»2 OR R*i 

* TO ?»■■'' TAR" ANO TRAP-1 ANO PI 
E»27 RNO HOUsl TMEN 00 TO 280 
9252 IP PI't TO 7) j" TRA" ANO TR 
flPsl AND Pie>26 RNO M0U«1 OR R| I 

* TO 71 ■" TRA" ANO TRAP-1 ANO PI 
£■27 AND MOU'2 TMEN GO TO 160 

9234 IP R«<* TO 71 ■" TRR" AND TR 
AP>1 THEN CLS GO SUB 5000 00 

fo iasa 

9235 IF Rfl* TO 71." TRR" RNO TR 
AP«0 THEN 00 SUB 75*0 RETURN 
9238 IF Rfl* TO 7i -" CLE" AND KE 
Y.l AND CLE'l OR Rfl* TO 7> ■" CL 
E" RNO CT-1 THEN PRINT AT 29,0 
IMPOSSIBLE J EN" — 
" UNE. 

180 1 
■1 then oc 

,"BIEN SUR.JC Lft ABENDS" LET CT 

■1 00 SUB *309 RETURN 

9302 IF Rfl* TO 71 ■" CLE" RNO CL 

E«l THEN PRINT AT 28 ,0 ,"0.K . . JE 

LA PAEtlDS." GO SUB *508 LET K 

EY.l RETURN 

0319 IF Rfl* TO 71 ■" CLE" AND CL 

E-0 AND CT-r — 

ETURN 



I THEN GO SUB 7530 R 



]INT AT 20,9, "O.K. 

LA PRENDS." LCT BE«1: PAUSE 30: 

GO SUB 4050 RETURN 
9351 IP Rfl* TO 7) (>■' CLE" AND R 
f (4 TO 71 <>" AHU" AND Rfl* TO 7) 
o" BOU" TMEN GO TO 8296 
9332 IF Rfl* TO 7) •" BOI" THEN G 
O TO 9139 

9353 IP Rfl* TO 71 p" COP" THEN G 
TO 9110 

933* IF Rfl* TO 71 •'■ TAP" THEN G 
O TO 9208 

9355 IF Rfl* TO 7) ■" AHU" ANO AM 
U=0 THEN GO SUB 7568: RETURN 

9356 IF Rfl* TO 7| »" BOU" THEN P 
PINT AT 20.8. "O.K. 

9337 IF vA>l THEN LET JA.Jfl-1 P 
PINT , "MAIS IL N'eN",AT 21,8, "RE 
STE PLUS OUE '.ja PAUSE 108 LE 
T P«20 00 SUB 393* RETURN 
9358 IF JA.l THEN PRINT , "MAIS I 
L N'EN",AT 21.0, "RESTE PLUS..." 

LET JA-0 LET P. 29 PAUSE 90 G 
O SUB 393* RETURN 
9339 IF Afi* TO 71 ■'■ BOU" ANO JA 

•0 TMEN PRINT AT 20 , . " IHP035 IBL 
E'''<",AT 21.0. "IL N'EN RESTAI3 
PLUS" GO TO 1 

9378 IP PIE. 21 TMEN 6CEP .9,0 P 
PINT AT 21,9, "O.K. .J Y DESCENDS' 

PAUSE 60 GO TO 3609 
9490 IF TRAP-1 THEN GO SuB 6089 
9*18 IP TRAPtil THEN PRINT AT 20 

,0; " IMPOSSIBLE, . .'* PAUSE 80 RE 
TURN 

9970 ORAU 103,78 PLOT 0,173 DR 
AU 103,-78 PLOT 235.173 DAAU - 
183,-78 PLOT 253,9 ORAU -183,7 

9971 PLOT 63,56 ORAU 0.60 DRflU 
63,0 ORRU 0.-60 

9972 PLOT 31,33 ORRU 9,186 DRA 
11 133,0 OUAU 9, -106 

9973 PLOT 23,17 ORAU 0,142 OR 
AU 287,9 ORAU 0,-142 

9174 PLOT 103,79 DRAU 0,3 DRAU 

49,0 DRAU 0.-3 
9973 PLOT 103,79 DRAU 0,33 PLO 
T 103,71 DRAU 49,0 

9976 PLOT 103,77 DAAU 40,0 ORA 
U 0,-3 PLOT 103,60: ORAU 33,0 



9977 DRAU 26,9 DRAU 8,-3 PLOT 
193,86- DRAU 20,0 DRAU 0,-3 PL 
OT 103 98: ORAU 13,9 ORAU 0,-2 



0976 PLOT 103,70 DRAU 0,33 ORA 
U 49.0 DRAU 9,-33 PAUSE 189 
9979 PRINT 10, "v'AUANCE. . .": OEE 
P .801,8 PAUSE 35 IP FIN->1 TM 
EN CLS PRINT AT 5,5, "Ja »0A'4 

i-«*c»'nr" BEER .06.20 print 
AT 18.3, "d'.ri-ivt d»A* vn* f;i««t 
..." BEEP .06,22 PAUSE 108 GO 
to io«0. iK.r.»i0O' 
99B1 6EEP 0.5,-15 BEeP .3,-19 
PLOT 93,13: DRAU 15.13 DRAU 23, 
ORAU 13,-13 DRRU -85,6 PLOT 
110,30 DRRU 0,-15 PLOT 138.38 

DRAU 8,-16 
996* PRINT H2, INK 3, "UN TAOU'lj 
E NE L AURIT PAS UUI 1 ' FOR P»l T 
5 BEEP 0.91. - IRNOt*0F NEXT F 

PAUSE 138 
9983 CLS INK 2 PLOT S3.23 OR 
AU 20,80 DRAU 30,-73 PLOT 33,6 
3 DRRU 20,3 PLOT 60.30 DRAU 1 

6,70 ORAU 16,-6* „ _ „ 

9486 PLOT 93.85 DPAU 17,3 PLOT 
130.70 DRRU 10, *3 DRAU 10.-42 

PLOT 133,93 DRAU 9,2„ 
9967 PLOT i70.80 ORAU 7,20 DRA 
U 7,-29 PLOT 172,69 DAAU 7,2 
PLOT 200,63 OARU 3.12 DRAU 5,- 
12 PLOT 203,99 DRAU 3,1 „ Mm 

9996 FOR P'*0 TO -*0 1TEP -1 6E 
EP .0O7.F: BEEP .003,F/2 NEXT F 

9989 INK 6 CLS PRINT PRINT 
PRINT "...«1 il HOUr-vl <.*rti O 

4< PRINT PRINT PIM.11 iU 

K 3, - TOUTANKHAMON." 

Btzi> .03,-3 PAUSE 1*8 INK 6 C 
LS GO TO *730 

9990 INK 6 STOP 
999S PAINT AT 30.0." 

" >A SEEP'?000.« 8CEP 0. 
098,5 INPUT nl." OUELLE PORTE 7 

,6§J ,rSS.- ?l <i?N 00 TO ,00. _ 

9997 RETURN ■ 



ESPACE CLOS 



Ce jeu ressemble un peu au Casse-Brtque, niais la, le 
joueur ne contrdle pas une raquette, mais des murs. 
Le mode d'emploi est dans te programme. 



J.Marie KUENY 



tO MM F1X« II VY/4A BASIC SIMPLE 

LLEAR 
I |0 RANIMKII.'l 

130 'OR l-i la 13 

: COLOR! 1.4, I > 
140 NEI1 I 
ISO CM I COLON (9. 10.41 

l«0 call ctximiui.ft.ji 

170 CALL CHARC.3,-AAS3AA53AA3SAA33-| 
lOO CALL CHAR(96."-> 

1*0 CALL CHARI97.-IB7E7EFFFF7E7EIB-) 
200 fOR l-O to I 

CHAR ( 1 H4 , -.18 /FOeOei C224 i • ) 
220 CALL CHAR(l20.B.|.-O03C7EDDFF814224- 
I 



230 CALL CHARI124H 



-FF5AJC192442B11 



S LES REGLES <0/N> "I I i I 

2AO CALL SCREEN 12) 

270 CALL KEY(0,K,8T) 

280 IF <k-78>»(K-lIO)lHEN 470 

390 IF (I ■79)*lK<>lll)TfCN 270 

30O CALL CLEAR 

M . SCREENS) 
320 PRINT TA8(9>:-pRINCIPE DU J£U"::-VOU 
S DISPOSE! DE TROIS VIES AU DEPART DU JE 
U. LA BALLE- 

-» PRINT -RFBONDIT ENTRE LES MURS ET D 
ETRUIT INOIFHREWiFNT VOS VIES OU V03 £ 
nnehis, OUI* 

:«■> Ptttm -RAFFtDRTENT DES POINTS SELON l 
E TABLEAU 5UIVANT : -; : TASI 10) 1 CHR* I 120> I 

5 PIS": i 
;3-_' PRINT TAB < I O I i CHR» U 24 ) j - 10 PTS"s: 
TAB(IO>!CHR4(12B);" 13 PTS": I TAB! 10) iCH 
Mil 32) I" 70 PTS" 
3A*> GOSUB 1910 

J70 PRIN1 "CONTROLE* LA TRAJECTOIRE DE L 
A BALLE EN AG IS SAN T SUR LA POSITION D 

ES MURS 1ATILN-* 

ZOO PRINT TION : DEPLACEMENT LIH1TE A I 
ROIS CASES!-::-LA TOUCME ALPHA-LOCK DOIT 

ETRE REMONTEE": : 
390 PRINT -VOUS JOUE* AVEC LA MANETTE N 
UMERO 1 OUI AGIT SUR LA PO-SITION DCS DE 
UX MURS VERB" 

400 PRINT -LESOUELS SE OIRIGE LA BALLE" 
410 GOSUB 1910 

RIN1 -VOUS POUVE* REFUSER LA POSI-T 
ION DE DEPART EN APPUVANT SUR LE BOUTON . 
PE TIR- 



4Jo PRINT "SI VOUS NE HARGUEZ PAS DE P 
niNlT. i.A FALLE VA PRENDRE UN NOUVEAU DE 
PART APRES 12 REBONDS" 




440 PRINT 

VIES Ei MARQUE* 
N PASSANT SUR LES 
430 PRINT -CASES-ti 



EZ DE SACRIFIER VOS 

DES POINTS E 

BONNES -I 

I " BONNE CHANC 



470 CALL CLEAR 

4B0 PRINT - RECORD 

490 CALL 5CREEN(2) 

5O0 CALL COLOR (12, 16.' 

3IO CALL COLOR! 13, ] 

320 FOR 1-2 TO 22 

5JO CALL HCMARd.A, 

340 NEXT I 

SSO CALL HCHAR(24,2&,4B,4) 

360 FOR I-I TO 3 

370 OOSIJB 1B40 

SBO CALL HCHARIL 

AOO GOSUB 1B40 

610 CALL HCHARIL 

620 N-N»l 

630 IF N-8 THEN 600 

640 H-l 

630 V-l 

660 GOSUB 1840 

670 V-L 

680 X-C 

690 M-3 

700 N 30 

7IO P-l 

720 0-23 

730 CALL HCHAR(Y,X,97) 

740 CALL JOYSTU.C.L) 

730 IF (L-O) *(C-0) THEN 1190 

760 IF L-O THEN 970 

770 IF V*l THEN 890 

790 IF L-4 THEN B40 

790 IF P-4 THEN 970 

BOO IF P-V-l THEN 970 

910 P-P*l 

820 CALL HCHAR(P.I1»I,33.N-H-i 

B30 GOTO 970 

840 IF P-l THEN 970 

B30 CALL HCHAR(P,M*I,96,N-M-I 

870 GOTO 970 

B80 IF L-4 THEN 930 

890 IF Q-23 THEN 970 

900 CALL HCHAR<0,M*1,96,N-M-I! 

910 D-O-H 

920 GOTO 970 

730 IF Q-20 THEN 970 



B> 



940 IF 

950 O-O-l 

960 CALL HCHAR(B,6,33,24> 
970 IF H*I THEN 1090 
*»BG IF C-O THEN 1190 
990 IF C-4 THEN 1040 

OOO IF M-3 THEN I 190 

OlO CALL VCHAR(P*1,H,96,0-P-1) 

020 M-H-1 

03O GOTO 1190 

040 IF H-8 THEN 1190 

030 IF M-X-l THEN 1190 

06O M-M*l 

070 CALL VCHAR(2,H,33,21) 

OBO GOTO 1190 

090 IF C-0 THEN 1190 
OO IF C-4 THEN 1160 
10 IF N-27 THEN 1190 
20 IF N-X*l THEN 1190 
30 N-N-l 

40 CALL VCHAR(P*1,N.33,Q-P-1) 
30 GOTO 1190 
60 IF N-30 THEN 1190 
70 CALL VCMARCPH,N,96,0-P-1I 
80 N~N+1 
90 CALL 6CMAR(Y*V,X*H 

200 IF G-96 THEN 1230 

2IO CALL HCHAR(V,X,96) 

220 Y-Y+V 

230 X-X»H 

240 GOTO 730 

250 IF G-104 THEN 1490 

260 IF G<34 THEN 1740 

270 S<-S*<e-116>*1.2S 

280 A»*S£G»<"0O0-VSTR»(S).LEN(-OO0-t.STft 

(S))~3,4) 

290 CALL SOUNDI30.300.10) 

300 COLL S0UND(3O,7OO,10> 

310 FOR I-I TO 4 

320 CALL HCHAR{24,25+I,ASC(SEG«(A4,I.1> 

) 

330 NEXT I 

340 GOSUB 1840 

3SO CALL HCHARIL, C, 120*4*!NT I4*RND> > 

360 CALL HCHARIY, X,96> 

370 CALL MCHARCY.V,XtH.96) 

380 GOSUB 1840 

390 X-C 

400 Y-L 

410 CALL HCHARIY, X.97) 

420 FOR 1-1 TO 30 

430 CALL ►:eyu,a.B) 

440 IF 8-1 THEN 1470 
430 CALL HCHARIY, X. 96) 
460 GOTO 13BO 
470 NEXT I 
480 GOTO 1190 



Ti-99 
SIMPLE 



I 190 


7-Z-l 




1 900 


CALL SOUNO(190.2O0.S) 




1910 


IF 1*3 THEN 1710 




1920 


CALL HCHAft(V,I.96) 




193) 


CALL NCHAR(W,X.H.97> 




194)0 


FOR 1-13 TO 21 




1990 


CALL MCHAR(I0.1,ASC(SEG»(-GAME 


OVER 


-. I- 


2, 1))) 




1SH 


NEXT I 




] 5 K 


CALL SOUNO( 1000.300,10,600. 10) 




iseo 


IF StR THEN 1640 




1990 


R-S 




1400 


FOR 1-1 TO * 




1610 


A«-SEG» ( "OOO-LSTR* (R> ,L£N( -OOO 


S.STR 


»!Fi) 


-3,4) 




1620 


CALL HCHAR(24,12.I,ASC(5EG»<A« 


t.D 


1630 


NEXT I 




1640 


FOR 1-7 TO 28 




1690 


CALL HCHAR(!3,l.ASCtSEG4|-REJ0LCR i 


FAITES ENTER*. 1-6, 1) >) 




1660 


NEXT 1 




1670 


N-0 




1 680 


S-O 




1690 


l-O 




1700 


CALL KEYIO.tf.ST) 




1710 


IF ST-O THEN 1700 




1730 


IF K*13 THEN 320 




1730 


END 




1740 


CALL GCHARIY'V, '.Gl 




i rso 


K-*<*1 




1760 


IF K-12 THEN 1430 




1770 


IF 6>33 THEN 1790 




I7B0 


V— V 




I790 


CALL SOUND 1 SO, 300.S) 




1900 


CALL GCHAR(Y,X*H,G> 




1810 


IF B>33 THEN 1190 




isao 






1830 


GOTO 1 1 90 




1B40 


L-INT<I3*RND*3) 




1890 


C-1NT(18>RND*9) 




: H 


CALL 0CHAR(L,C,8) 




1870 


IF G-96 THEN 1840 




lain 


CALL SOUND(130.3OO0,3) 




1890 






19O0 


RETURN 




1910 


PRINT ii-APPUYEZ SUR N'IMPORTE 


QUEL 


LETOUCHE POUR CONT 1NUER. . . " 




1920 


CALL SCREEN(2) 




1 V TO 


CALL COLOR! 1?, If., 1 1 




; 'J- M 


CALL COL0RU3, 14,11 




19SO 


call K7CY<0,K,8T) 




1960 


IF ST-0 THEN 1930 




1970 


CALL CLEAR 




1980 


CALL SCREENI4) 




1990 


RETURN 


■ 



ALPINISME 



HP 41 



Nombreux sont ceux qui un jour ont reve d'escalader 

les plus hauls sommets qui nous narguent aux cours 

des annees. 

Mats aujourd'hui c'est fini. Grsice a votre HP 41 muni 

dun module memoire, vous allez pouvoir vous payer 

ce plaisir sans sortir de chez vous. Pour cela, vous de- 

vrez vous munir d*une feuille de papier quadrillee et 

dun crayon. 

Le programme accepte jusqu'a 6 joueurs mais il vous 



est facile d'en rajouter si vous possedez I'espace me- 
moire necessaire. 



Bernard BLAY 



Un puadrillage 99 x 99 represents un terrain montagnoux. La ma- 
chine vous demande de proposer des coordonnfies de points. En 
fondion de ces coordonnees elle determine lattitude des difle'onts 
points; le but du jeu etant de grimper le plus haul possible. Mais 
attention, certains sommels sont plus hauts que d'autres, serez- 



vous sur le bon? Le roliel du terrain change pout chaquo partio 
Voici les diverses possibilites: Choix des sommets < 8. Choix du 
relief (60 tres doux. 25 modere, 10 ou moins accuse). Choix du 
nombre d'essais par joueur. Nombre de joueurs < 7. 
Le jouour doni lo nom viont de s'alficher propose I'nbscisso. puis 
lordonnee du point qu'il essaie. Le calculates delermino I'altitude 
de co point, rappcllo les coordonnoes ot atftche lallitude Si colto 
altitude est plus forte que le procodon! record de ce jouour, la ma- 
chine emet 3 notes ascendanlos ct momoriso lo nouvoau record. 
Ouand tous les essais sont termines, le calculator altiche le record 
de chaque joueur. puis les coordonnees et I altitude de chaquo som- 
met. 




89:37 21.6i 


39 -RELIEF »■ 


68 STO 38 


98 TONE 8 


128 PSE 


158 t 


179 RCL 29 


9I»LBL -HLP- 


31 PROUPT 


61«LBL 83 


91 TONE 9 


121 ISG 88 


151 STO 29 


188 - 


92 cf n 


32 STO 31 


62 BEEP 


92 XOY 


122 CTO 87 


152 RIN 


181 RCL IND 28 


83 FIX 1 


33 -Nb JOU. ? <7" 


63 ML RESTE ■ 


93»LR 86 


123 XEO 28 


1534LBL 98 


182 INT 


84 CIRC 


34 PROUPT 


64 ORCL 39 


94 XOY 


124 RCL 29 


154 RCL 88 


183 RCL 28 


85 -Kb sen. 7 ;8- 


35 .993 


65 ■*■ ESSOIS- 


95 STO IND 88 


125 STO 39 


155 FRC 


184 - 


86 PMBPI 


36 • 


66 HVIFU 


96 XEO 18 


126«LBL 99 


156 STO 89 


185 R-P 


W 28 


37 STO 99 


67 PSE 


97 TONE 8 


127 RCL IND 38 


157 ISC 98 


186 RCL 31 


88 ♦ 


38 XEO 88 


68 XEO 99 


98 OVIEN 


128 ENTERt 


158 RTN 


187 / 


89 1 E3 


39«L8L 82 


69«LBL 84 


99 PSE 


129 INT 


159«LBL 18 


188 CNS 


18 / 


48 RCL 88 


79 CLB 


188 XEO 11 


138 STO 28 


169 -X=- 


189 EtX 


11 STO 28 


41 3 


71 ORCL IND 88 


181 ISC 88 


131 - 


161 ORCL 28 


198 1 E4 


12 XE9 28 


42 / 


72 ISC 88 


182 CTO 84 


132 I E2 


162 *F Y=- 


191 • 


13 -8<WI '" 


43 1 


73 ORCL IHD 88 


193 DSE 38 


133 • 


163 ORCL 29 


192 RCL 28 


H PROHPT 


44 • 


74 PVIEU 


184 CTO 83 


134 STO 29 


164 RTN 


193 FRC 


I5*LBL 81 


45 -NOB Ml J • 


75 TONE 8 


185 XEO 88 


135 XEO 88 


I65«LBL 11 

166 "OLT=- 

167 ORCL 19 

168 PRONPT 

169 RTN 


194 1 E3 


16 147 

17 . 


46 PRCL X 

47 "I- - 


76 PSE 

77 "XT 


196 BEEP 

187 -RESUITMS 


136 TOME 9 

137 -SONNET :■ 


195 • 

196 28 


18 FRC 


48 DON 


78 PROBPT 


188 OVIEN 


138 OVIEN 


197 - 


19 EKTERt 


49 PROMPT 


79 STO 28 


189 PSE 


139 PSE 


198 / 


28 ENIERt 


58 HOFF 


89 -V- 


1I94LBL 87 


148 XEO 18 


199 STt 19 


2! 1 E4 


51 PSTO IKS 88 


81 PROhP! 


111 CLP 


141 PROHPl 


I78«LBL 88 


288 ISC 28 


22 « 


52 OSHF 


82 STO 29 


1 12 ORCL IND 98 


142 XEO 1 1 


171 XEO 28 


281 CTO 85 


23 INT 


53 ISC 88 


83 XEO 98 


113 ISC 98 


143 ISC 39 


172 8 


292 RTN 


24 1 E2 


54 OSTO (HD 98 


84 ISC 88 


114 ORCL IND 88 


144 CTO 99 


173 STO 11 


283 .END. 


25 / 


55 ISC 88 


85 RCL IND 88 


115 OVIEN 


145 CTO -OLP- 


174»LBL 85 


■ 


26 STO IND 29 


56 ISC 88 


86 RCL 19 


116 PSE 


146«LBL 29 


175 RCL IND 28 




27 urn 


57 CTO 82 


87 X(=V> 


117 ISC 99 


147 RCL 28 


176 FRC 




28 ISC 28 


58 "Kb ESSOIS?- 


88 CTO 86 


118 VIEU IND 88 


148 FRC 


177 1 E2 




29 CTO 91 


59 PROBPT 


89 TONE 7 


119 PSE 


149 21 


178 • 
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exelvision 



Ou trouver I'EXL 100 
pres de chez vous 




exelvision 

L'iniormatique facile a vivre 



BOURSE 
DE LA MICRO 



initiative nouveiie et mteres- 
sante les micros sur lesquels 
vous avez fart vos debuts et 
que vous avez oublies dans un 
placard, vont refaife leur appa- 
rition Tous beaux et tous frin- 
gants. ils vont se retrouver sur 
les etageres de la Bourse de 
la micro Quest ce que c'est 
encore que ce machin la, vous 
dftes-vous fort judicieuse- 
menf Serait-ce une sorte de 
revente de materiel d'occa- 
sion, remarquez-vous fort a 
propos 9 Vais-je pouvoif y 
acheter une superbe becane 
d occase, vous demandez- 
vous avec une perspicacite 
hors du commun' Puis-je es- 
perer y revendre ou y echan- 
ger mon fidele compagnon 
pour un plus beau et un plus 
neuf et un plus performant el 
un plus a la mode et un avec 
un wagon de Ko et un avec 
une mtcro-disco-cassetto-me- 
moire de masse de course, 
vous posez-vous la question 
avec une pertinence fnsant ie 
genie? 

Qui. oui. oui. oui sont les re- 
ponses a vos spiendides ques- 
tions, bravo' (Ceci etail la pre- 
miere partie de cet article de 
demagogue de service de 
i riebdo. merci monsieur, au 
revoir .') 

Soyons seneux. la Bourse de 
la micro c'est une superbe 
idee: les responsabies de 
cette jeune entrepnse vont 
plus loin que la simple revenle 
de materiel d'occasion. Vous 
pouvez simplement mettre Ie 
materiel que vous desirez ven- 



dre en depot dans leur bouti- 
que de la rue Rodier. cetle for- 
muie de depol-venie ne vous 
coutera rien si ce n'est une 
commission sur Ie pnx de 
vente du matenel que vous 
laissez en depot (de 10 a 15 % 
selon les mateneis). Mais, la 
ou cela devtem beaucoup plus 
interessant c est la formule de 
'Bourse de la micro" qui est 
une sorte de dub Ou pour une 
cotisation annuelle de 350 
francs vous avez droit a parti- 
ciper aux bourses d'echange 
de maienel entre particulars. 
que ce soil pour Ie maienel ou 
pour les logicieis Vous avez 
aussi droit a des stages de for- 
mation d initiation a I'uliltsation 
dun micro Ou encore au basic 
pour des sotnmes raisonna- 
bles (200 a 600 francs) sans 
commune mesure avec les 
tanfs dingues que proposent 
les rjrganismes de formalion 
qui se montenl actuellement 
En etant adherent a la Bourse 
de la micro vous aurez de 
plus, des conditions particuhe- 
res pour vos depdts-venles. un 
bulletin d'inlormation mensuel. 
la consultation gratuite dune 
bibliolheque micro. Ie hbre 
echange de logicieis et enfm 
des bons de reduction impc- 
tants (5 3 10 %) sur ("achat de 
maienels neufs et sur les four- 
n.tures C'est plul6t sympa 
comme formule. non' Z'oni 
des bonnes idees. ces gens la' 
Allez done faire un tour chez 
eux de la part d Hebdogiciel et 
6cnvez-nous pour nous dire ce 
que vous en pensez BOURSE 
DE LA MICRO 6 rue Rodier 
75009 PARIS. 



CALCULEZ SUR HEBDOGICIEL 

Ce sont des calculalrices Casio, elles ont Ie label HEBDOGICIEL et une table des codes ASCII 
bien pratique pour vous aider dans vos programmes. Prix hebdogiciel et garantie 6 mois Vous 
pouvez compter sur elles 1 



innmiinu 1 


ctntuct 




! *{ !.« 1 








■■■■■■ 
■■■■■■ 










La LC-311 est un peu plus 
grande qu un paquet de ci- 
garette, mais moms epaisse 
: motns de 8 m m. Memes 
fonctions que la SL-800 et 
une carte de codes ASCII 
80 francs- 



▼ 350 Frs 



La SL-800 Film card est aussi plate que votre carte de 
credit: 0.54 mm d'epaisseur. Pas de piles: alimentation 
par pile solaire. une simple ampoule electrique suffit a 
l'alimenter.8 chiffres de capacite. pourcentage. racine 
carree. memoire. Et une table des codes ASCII au 
recto pour vous aider dans vos programmes 



■ 




Commandez ces calculatnces a: SHIFT EDITIONS 27 
rue du General Foy 75003 PARIS: 

Nom Chfcju* D 

OOF 
VMe rnws o«nvo. - 1500 F 



Coda C 



Frw fftynvo. 

TOTAL 
DM 



OOF 




CONCOURS 
GEORGES LECLERE 

Ms ont gagne Ie concours du poKer-alphabet organise oat Heb- 
dogiciel et Georges Leclere De gauche a drone . Messieurs Ro- 
driguez sur One. Nogues sur Canon X07. Laievee sur commo- 
dore 64. Georges Leclere. Seban sur spectrum. Rottenberg sur 
Apple et Saliva sur Texas Ms sont tous repartis avec des cassel- 
;es TDK et un agenda Casio PF 3000 Sauf jean-pierre Laievee 
iui n a pas pu fermer les portes de sa voiture tenement il avait 
:e lots a emporter. (Apple, Canon. Commodore. One. Casio. 
fcpson. Sharp et une caisse de logicieis) Ils peaufmenl a pre- 
sent leur programme et Hebdogiciel les meitra en vente en No- 
.embre. A eux les royalties' 



MANOIR 



Vous etes dans un manoir. vous pouvez evoluer a 
votre guise parmi les 9 zones de letage dont 6 cnam- 
bres et un couloir coupes en 3 parties. 

Eric ZMIRO 

Au debut de chaque partie. vous vous trouvez en zone 2 Lordma- 

teur vous mdiquera tout ce que vous pouvez voir ou rencontrer Le 

but du ;eu ouvnr un cotfre fort cache dans lune des 9 zones. Cer- 

laines indications sot! pour le localiser. son pour louvrir. peuvent 

vous etre donnees Dans votre periple. la chance sera un tacteur 

important Elle vous sera indiquee (val. n) Son maximum est I, son 

minimum 

Pour se deplacer, mettre la premiere lettre de la direction voulue: D 

(drorte). G (gauche). A (avancer). R (reculer), V (voir) 

Lcsque la machine mdiquera ptus*urs actions possibles (ex: l 

pan r 2 emrer j meltre le chiffre correspondant a I'action desiree 

Pour debuter la partie: Fl P0. CONT 



FX 702 P 



STEW 

wiMOiri 

12 E=:- T 
n if 1 1 
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.-■■ 

■ 
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TO 28 
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:|F WiPJl "fl 

'-:;oio3e 
jipjt "ft e 

fiUCI£":60T0 38 
!8 IF <>8:PPT "EH 
FKE" 

- iPKI "S.fl 
BETE" 

12 if »}:i 

28 IF »(:■'•: II 

IflEQ I 

2S IF l'.x-!)M:WI 
•PIECE R GROCK 

E' 
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EI 

JlSOIO I 
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la page pedagogique 



la page pedago = 



PGdagogie et g6n6alogie peuvent-elles faire bon menage? Probablement avec cet article d' Alain PRE qui non seulement nous 
propose un logiciel fort bien documents, mais egalement une utile table de conversion des differents logos. Cette table de conversion 
est tres complete et il nous faudra plusieurs semaines pour la publier en totalite: cette semaine les fonctions graphiques des logos. 

GESTION DUN ARBRE GENEALOGIQUE 



Qui sont les oncles (on (antes) de Paul? Combien Christian a-t-il 

de freres? V a-t-it un Claude par mi los beaux parents de 

Jeanne? 

Voici des questions que vous pourrez poser a ce programme 

quand vous I'aurez tape sur votre ordinateur. II est ecrit en 

LOGO car ce langage se pr6te bien a la manipulation de don- 

nees non numenques II est possible de le traduire en BASIC 

mats cela apportera deux inconvenicnts: 

•II faudra tes noms des personnages et leur liens de parente 

dans un tableau. Le nombre de personnages sera done limite a 

la ta>lle du tableau. 

-L'interrogation ne sera pas aussi souple qu'en LOGO. 
En effet, les questions peuvent etre posees presque dans un 
francais courant.: 

AMiche le mari de Jeanne 

Atfiche la liste des fils (ou des 
tilles) de Jeanne. 

Ce sont les m6mes (le pro- 
gramme ne gere pas d'even- 
tuels demi-fr6res.) 

Voici comment traduire les trots questions cit6es en exemple ci- 

dessus: 

ECRIS FRERES PARENTS "PAUL Freres de parents - oncles 

JACQUES SYLVIANNE VALERIE PIERRE 

ECRIS COMPTE FRERES 'CHRISTIAN 



I - UTILISATION DU PROGRAMME 



Vous dispose? de deux procedures pour modifier I'arbre gen6a- 

logique: MARIAGE et NAISSANCE. Tapez slmploment: 

MARIAGE "Nom-du-mari "Nom-de-la-mariee 

ou 

NAISSANCE 'Nom-de-1'un-des-parents 'Nom-de-l'enlant 

Exemples: 

MARIAGE 'PIERRE-DUPONT MEANNE-DURAND 

NAISSANCE "P1ERRE-DUPONT 'PAUL-DUPONT 

Pour poser des questions, vous disposez de quatre fonclions qui 

peuvent etre combiners a volont6: FILS. PARENTS. FRERES 

EPOUX. 

Exemple: 



ECRIS PARENTS PARENTS "PIERRE 



ECRIS FILS 'JEANNE 
CHRISTIAN MARIE PAUL 



ECRIS FILS "PIERRE 
CHRISTIAN MARIE PAUL 



Atfiche les noms 
des quatre 

grands-parents 



ECRIS MEMBRE-> "CLAUDE PARENTS EPOUX 'JEANNE 
VRAI 

Ce programme peut aussi etre utilise comme un teu de memoire 
a un ou plusieurs joueurs: sur une famille imaginaire. chaque 
participant ajoute un manage ef une naissance puis, pose une 
question du genre: qui sont maintenanf les oncles de Pierre? 
II est tori probable quapres trois ou qualre lours de jeu. aucun 
des joueurs ne sera capable de repondre correctement. Heureu- 
sement. LOGO en bon arbitre. se souviendra toujours de la solu- 
tion. 

Pour que le jeu soil mt6ressant. il faut partir avec au moins dix 
personnages. Pour aiouter de ('animation, les noms peuvent etre 
ceux des joueurs. 



Natureliement. vous pouvez vous creer vous-meme de nouvelles 

fonctions: 

POUR GRANDS-PARENTS :NOM 

RENDS PARENTS PARENTS :NOM 

FIN 

POUR ONCLES :NOM 

RENDS FRERES PARENTS :NOM 

FIN 

II - PRINCIPE DE FONCTIONNEMENT 

Le programme ne gere que les trois principaux liens de parente 
(a parlir de ceux la. il peut retrouver tous les autres). Ce sont. le 
lien fils (F.). le lien parents (P.) et le lien 6poux (E.). La figure t 
montre Templacement" de ces liens sur un arbre g6n6alogiquc 
tel qu'on le represents habituellement. La figure 2 illustre la 
fa^on dont LOGO materialise ces liens. Cela parait un peu touffu 
n'est ce pas? Heureusement. vous n'avez pas a vous en sou- 
cier: e'est le programme qui met a jour tous ces liens. 



Ill -LE PROGRAMME 



MARIAGE cree un lien "epoux - (E.) pour chacun des deux noms 
NAISSANCE: 

-Cree un lien "fils" (F.) pour le parent nomm6. 
-cr6e un lien "fils' a I'epoux du parent nomme. 
-cr6e un lien 'parent" a lenfant. 
-ajoute a ce lien "parent" ('autre parent 

Ces creations de liens se font par AJOUTE et non pas par 
DONNE car il ne faut pas effacer les liaisons qui peuvent avoir 
616 cr66es pr6c6demment 

Par contre. MARIAGE utilise DONNE car. generalement. on ne 
peut etre marie qu'a une seule personne a la fois. Les polyga- 
mes peuvent toujour modifier la procedure MARIAGE. 
Ensuite, nous trouvons les fonctions d'examen de larbre Les 
trois premieres (EPOUX. FILS. PARENTS) sont construites sur 
le meme principe: elles utilisent un des liens cites plus haul pour 
retrouver I'epoux. les tils ou les parents. 

La quatneme (FRERES) est une combtnaison des trois premie- 
res. Elle retrouve les freres en cherchant les tils des parents. 
Mais, avant de rendre son resultat. elle supprime le :NOM de la 
liste trouvee. 
II V a aussi quelques fonctions plus specialises: 



FILS-UNIQUE :NOM 
AINE :NOM 
CELIBATAIRE :NOM 
DESCENDANCE :NOM 



retourne VRAI si :NOM n"a pas 

de freres 

rends le Ills aine de :NOM 

rends VRAI si :NOM nest pas 
marie. 

renvoie tous tes fils et petits fils 
de ;NOM de toutos les genera- 
tions connues du programme. 



Enfin. SUPP. AJOUTE et LIEN? nont pas a otre tapeos au cla- 
vier: ce sont des procedures appelocs par les autres. 
SUPP enleve un mot dune lisle. 

AJOUTE ajoute un mot a une liste s'il n'y est pas deja present et 
cree la liste si elle n'existe pas encore. 
LIEN? rends vrai si un lien donnd a deja 6t6 cr66. 
Ce programme a 616 6crit sur THOMSON T07 mais il tourne sur 
toutes les machines qui possedonl LOGO. N6anmoins, il peut 
6tre n6cessaire de changer certains mots car los primitives sont 
I6g6rement di(f6rentes dune machine 6 lautre. Vous trouverez 
en annexe, un tableau d'6quivalence entre los principaux LOGQ 
actuellement disponibles sur le marche. 
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VIC FUTE 



Un programme roulier utile A vous de le mettre a jour 
tous les ans! 

Philippe BOtCHUT 

II vous propose, pour les 10 axes routiers (rancais les plus parcou- 

rus: 

-Les distances en km entre chaque grande ville 

-Le numero de telephone des Syndicate d initiative de ces memes 

vriies 

-Le pox de I'auloroute pour ce trajet 
•"L itineraire bis" de voire trajet 
•Les zones de bouchons importants de tous les grands centres rou- 

nersde FRANCE. 

Nota. A la question "Quelle direction?", repondez par le numero du 
trajet Appuyer sur Fl pour chaque nouvelle page. 
Necessite une extension 3K 

Attention: les lignes 1 0X) a 120 sont retirees en minuscules au oas 
du listing 
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lie w»:mt-« 

129 PRINT*9JMI 9PPUVE2 $t*? .1 POUR 

i» t*iiiise.i ROKEiw.e 

,40 c*f,T:>**'.:4i' 

i» pBiKi-ran.pnBis-MicE 

tee p*[Mi*«.w*is-K««€flux 

---.KJURG-BQRDEMJX 

198 PRInT-93.»AH0US£-PERPIGHR*« 
299 mHT*a6.H£TZ-CA£» 

;<ie F*:NT-«.E7£&6>eeR6c«EtfEs 

239 PRINT*»3.I»;Cti-nONTPEU.IER 

249 PRINT- «B.LVCf.-.: XX 

259 INPUT- WtCLLE 3IBECHCNBT .« 

269 IFP**ORS>-UTHeHP*flNT--rr 00T0239 

279 PRINT-7» 

£90 IF0»lTf€N1378 

2» GOSU81388 

»9 PPINT-WJ PttlA B£ L-ftUTOROUTE «- PE*W 

jib or i nt ■•••j -a.- frwcs- Gosuen** 

328 PRINT-riWi SISTPKES fB" 

..... p(Kfilii77MTOei428TEPa2 PO:E-l lit ="-£-:• ;■/;.:■ 

348 FORP-tTO-.e RERIO 

358 PRIHT'VSFCUX) 

368 F0PT-1T069 MEXT M£XT 

j'e p*iht-n 

:• - : - --.-. .j - \ ■■■ 
398 PBIHT.'VSPexn » p 

498 FCRT.1T068 NEXT MEXT 
410 QOSU>1390 

-;-? ■-:•■;■.■»« :--:i;;*r s-iMiflTivc sr 

439 F0PP-1T018 

438 =»T-:TtJ68 NEXT NEXT 
**8 PRINT"*! 
470 F0RB-IT019 

•60 REJWtl 

4W pR:KT-«rsPc:i2>H* 

see POPT>iToee next next 

918 Q0SU8I398 

529 PRlHT-n-J" irirCRFTPES BIS BT 

538 PRINT" FLECHES En tf/EPTSN 

543 FDPP-1T07 

'-M PEfiM* 

568 PPINT-*rSPC:7,M 



2 NEXT 758 



FOPT-1T069 HE/.T HEX! 

GOSUB1398 

GOTO I 468 

---- :■■!■ ~a> = = ■-.?: :■.!■-•:■■'- -:.:e ■».■■« 

PPINT-B-WI5 ■' 1)9856. 33. 33 

PRInT"«LILLE ■ ^I9'«?I.92.33S 

PRINT -»fWSE[LLBi<91>«7e. 78.791 
PRII(T-»FEKNES *f',93j93e. 73.933 
PfilNT-WORBEPUZ -/36J936. 33.333 
PRINT'S. YOU ■<7>9334. 33.733 

PPIKT'irtTZ «'3j*762. 11.223 

G0SUE1398 

PRIMT-.TWBBW ijn 8UTPE ITINERRIRE? M '0/H>- P0KE1S3.9 

iJETft* IFft*-"-TWEN?83 
IFP<t*"0"TkiEiilS8 

IFflf--N-tHE>IP«!NT-.-B- PWE36879.27 END 
GOTO708 

WTR21 1.58. 8. 228. 388. 338, 388, 435. 553.733. 3*3,933 
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S DfiTeSiJR0E o ZS,SflIMTES-BfJRIieflUX,723.61.72.53.83.55-7«.e4.4?.B5,38.83.2l.e5.47 
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i :flT«rp^BOJRG.SfiPTC0UEf1IIC3,PCTZ.VEP^WrC.THIESP-'.P^IS.Tr>.i«.irHflTELLEW«JT 

9 DHTRSntNTES, BORDEAUX 
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1448 F0PT«1T099 NEXT 
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WAR BLOK 



WAR BLOK esl un programme pour 707, avec manet- 
tes de jeu. 

On dirige un petit personnage jaune qui pousse des 
blocs de pierres (5 au maximum) pour enfermer le ser- 
pent rouge entre 4 pierres. 

F.LOSFELD 



Instructions: Les murs exterieurs peuvent servir a entermer le sei 
pent. Voici une methode pour I'entermer facilement: 

L'enfermer dans un grand piege et le retrecir pe\\\ a petit. Mais. 
attention, une pierre poussee a travers le serpent passe de I'autre 
cote de celui-ci et il peut done s'6chapper du piege. Une fois en- 
fermfe, les scores apparaissent et en appuyant sur le bouton de la 
manette, le jeu reprend jusau'a ce que le temps soit ecoule. 




; RE" •■•• FPPHCO.'j L0iFEL& 1984 •*•■ 
l CLEAR, .48SC0SUB 4899B 
! CLS:CLEOt-l808,,i:LOC6TE!8, :2,e.*P»I*I-A 
RRUVEZ SUR 'ACTtOH" 

18 SS«P»[>:IF STRICn>»8 TNEN 19 

22 TENP-i 19S=CLS: ^CPEEN6, 8, 0: PR I "T : PR I NT 

30 TE"P-TEHP-190iIF TEMP'I THEN T£MP-l:F 

INI-l:CrjTO5890 

48 C.EFCRI'8/-16,5&.36. 144,249,16,48,1841 

58 -.ErfiRfi j-8,25,23,9. 19/8/12/22iA18*Qft 

»'!> 

H :ErCRl'2'£4,5.197,254,97,9,9.8lA2i-C 

M(2) 

78 -.irr.f'f 3, «B, 8,9, 97, 254, 187, 9,24:A3t-<". 

- % 7 

H :£!-!">*. */* 3, 3, 18,42,42,42,36. 192:81* = 

&R«'4> 

56 DCFf J P*'5'»I52. 192,72,84,84,84,36,3182 

(>GB9<S3 

:I«T(RNC*', U 



lie if zz-i 



PPIKT- 'iCMPfI27)j 

THEN P«1«CH»<I27>;CHMU27 

128 If'zZ-4 THEN PPiNT- "JCNR*'I27,; 

138 IF ZZ'Z THEN PR IHTCHP*' 127 >l ' ■; 

1*0 IF ZZ-0 THEN PRIHT- -| 

•.Z9 MEXTT 

168 C0L0R4:F0RT-2T023:lCiC^te8,I:PRINT'.kR 

i- ;;?.':Lr J CCTE3?.T:PPlMTrHPia27 J ;:NE:- , -T 

179 FOPT-1 TO 38!L0CATET,2fPPINTCHP«' 127 

':L0CaTET,23!PPINTCHR*' 127,iNEXTT 

188 »-INT'PN[,*38*5^e«I«T.PNr J il3-!, ■: :■ 9 

:PEEN'ft,B"127 THEN186 ELSE LOC-TE- . c. '■<■■ 

c0u0r3iprihtmi 

196 h-::.'.:n:^pn:*ic-*!: ■; •■= int ■*«> :■■-■■ 
269 G* 8TI«(1) 608OB : i99, 1289. 1 108. 1 10 
8, 1388, 1386, 1006, 1089 

: r>VlOM H C0':UE ^080,2180,2280, 
2339 

228 IF SCPEEN' ->t, ■' ■■12? -Nt/ SCREEN.'/-1, 
. -12^ AND SCREW - -I ''.27 AN[> 8CRECN4 
. : •: i"I27 THEN 5008 
278 IF = ■ AMD ■■-<"< THEN H-INT' PNC-*4-l -■ 
388 TEKP-TErtP-lilF TEHP- I THEN flHl-HCO 
TO5000 

319 LOCATE16, 1 1 PR INT" temps: "iTEHP 
598 C&T&208 

1989 A!«AtBl-Ss!F PEE-' 1>;3E,3— B<326>-9 
THE* —--I :r,oTO'0?e 
1810 IF P0INT'A*8-4.B»3*4,»4 THEN 1056 



1020 FORT- A-l TO H-6 STEP-1 i IF POINT'T 

• i-4,e*S-4<-4 THEt; 1099 

1010 IF SCPEEM'T,8>=32 THEN LOCATET.BJCO 

L0P6IPPINTCMRI' 127>>A"A-I :BEEP;&OTO1090 

1046 NE/TT 

1890 CCLOP3:lOC1TE<i1.B1:PPINT- -ilOCATEA 

.E:P"INTii9*:PETljpN 

1108 £.l-6!8l-8i IF PEEK' l6333*A'B*329,-8 

THEM -i&*l ICOTO1I90 

1118 IF PQINT'fc*8'I2.B*S*4,-4 THEN 1150 

1128 F0PT» A* I TO &*6 :[F P0INTa<8*4,B* 

3»4,-4 THEN 1190 

1130 IF SCREEN'T,B.»32 THEN L0CATET,B!C0 

LOR6iPPINTCHe«'127,:A-A*l{BEEP!COTOll90 

1148 NEXTT 

1(98 C0LOP3iL0C6TE61,Bi:PPI«T- -ILOCATEA 

■6:PPlNT6ll:PETUPN 

;>03 ^l-(.:Bl>Bi IF PEEK'163*4«A*B*326> = e 

THEN 8-6-1 IC0T01298 

1218 IF P0INT'n»8»4,B*S-4-«4 THEN 1298 

1220 FORT- B-I TO B-6 STEP-i :1F POINTfA 

•8>4,T*3<4>>4 THEN 1298 

1238 IF SCPEEN<H,T,"32 THEN LOCATEC.TtCO 

L'jP6! PPINTCHPI'l 27 ■ : B'B- 1 : BEEPi GOTO 1296 

1248 NEXTT 

1296 C0L0P3:L0CiT£t.l,Bi:PPINT- ■iLOCfltEfl 

,BlPPIMT02«iP£TUPN 

■ 308 »l>AiSI*BHF PEEK'16784»A»B*120/'0 

Then B«B»1 tG0T01398 

1310 IF P0INT'A*3*4.B»9»12,"4 THEN 1396 

1320 FOPT- 8*1 TO B*6 ' IF POINT' 6*3-4. 7* 

>.a ...4 THEN 1398 

1330 IF SCREEN'S, T>-32 THEN L0C^TE».T:f_0 

L0P6 : PP1 NTCHP*' 127 .ip-8* H BEEP" GOTO1^'»0 

1340 NEXTT 

1396 C0L0P3:l0CATE-1,6HPPINT- -JL0CA7EA 

■B:PPINTA3*:PETUPN 

2008 XI-XiVI-r'tlF PEEK'l6383*X»V»320i-e 

Then lex-HIF |«lTCRttOR4)<> I THEN 2098 

2018 IF PEEKM6344.>;.v*32B>-0 THEN M- 3 

2020 IF RCEl" 16704. »Y*326'-8 THEN H-4 

2090 colophlocote>:i,y:ippini- "jLOCATE/ 
,y!prii»t82*!retupn 

2100 Xl"Xm»YlJF PEEK--l6385*X*V»329>-8 
THEN X*XtlflF INTcmD«4)<>t THEN 2190 
2110 IF PEEK' J6704*X»Y»320>-8 THEN H«4 
2128 IF PEEKM6344tX-Y*320.-0 THEN H-3 
2190 COLOPULOC-Tf/l.YUPPlNT- "1L0CATEX 
-VSPPINTeniRETURN 

2289 Xl-Xiri-Y: IF PEEK - I „344./*Y»320 i«0 
THEN Y-Y-1'IF INT'PND*4.,'>I THEN 2290 



2210 IF PEEK(16303.X»Y*320>"0 THEN H« I 

2220 IF PEEKa6385-»Y*32e>-8 THEN M-2 

2290 COLOPHLOCATEXl.YltPPINT- -sLOCRTEX 

,Y1PRINTB1*:PETUPN 

2300 Xl'XiVl-YlIF PEEK(I6784*X*V«3ae>-e 

THEN V-Y*l!lF 3NTi , PN&«4>->lTH£N 2390 

2310 IF PEEK(16385*X*Y*328>»e THEN H-2 

2320 IF PEEK(!63a3*»Y*320>*0 THEN H- 1 

2390 COLORULOCATEXi.YUPPINT" -1L0CATEX 

,YiPRINTB2*lP£TUPN 

3000 COLOR4!FF-0iC6-Cfi'I : PO-PO'T£MP*Cfi 

3685 IF FIXI»1 THEN 6000 

3818 fi* = "D0C'O*REPE*MIFHFit«;OSO«LHL"l;I- 

5020 B»""SILA*LOSOIiOFH*F»nlPE*PEDD*rjO- 

5030 FOPT-ITD2'PLfrY-TIL10O2'*6**'O3"*A«* 

•04-*A**-05"'A*'BI*-0***8«*'03-»8»**02"* 

B*iNEXTTiCLS 

3050 PPINTlPP]NT:PPINt:PPINTtPPINT:PPIMT 

1PPINT 

3060 PRINT' POINTS *IPO 

3070 PRINT>PRINTiPPINTlPPlNT- P 

ESTE TENPS *1 TENP 

5038 PRINTiPPlNTiPPINTtPRINT- M 

ANCE3 'ICA 

5090 COLOR6tLrjCATEl0,20!PRINT-APPUVE: SU 

P 'ACTION' * 

5180 Df-P/^OMF STPIG,l..9 THEN 5108 

5218 CL3iPPINT:PPINTtC0TO38 

6060 ATTRB0. liCLS:5CP£EH3,B,8 

6093 C0L0P3iCA-Cii-I 

6010 FORT-ITOI"LOChTEI0. l3.0iPRINT"L£ T 

EHPS EST ECOULE'tPLftVOST^lWPiCLSiHEI 

TT 



6868 L0C6TE8,14iPRINT- Ht-NGES 

. ..-;CA 

6680 FOPT.lTO100eJNE:.:TIl«TTP6C,OlPl>N 

46808 CLS 

48013 CH8-CHR8C8 ■•C"R*'10, 

43820 DEFCRl'0 '•8,8,23. 46. 102,102,199,11 

4803O C-EFr.fr*. 1 r«m, 9t, 96. 9«, 34, 28/8/8 
40848 E*»CRf<8J*CHI+CR»(IJ 

48058 0EFCPI-2'«0. 32, I li, '-■:-■ 

40868 t>EFCe*'3'»2*.24.2*,24,20,!4.4,8 

40676 L«-iiP*' £ ■•CM*-CPi<3> 

46896 DEFCP*' 4 >-0, 8,28,46, 192, 102, I 02. 1 1 



40130 0»-CR»<6"CHI*i;RI<7) 

461 40 DEFCRt(8>-e, 10,28.44,96,96,112,56 

40150 DEFCRK9J-28, 14,6.6,52,56,88,0 

48160 S*-CPi<8'*LHfG-P*<9' 

40170 DEFGR*<10'-O, 10.28,44,96-96,96, 128 

46198 DEFCP" II <-120, 96.96.96, 96. 96,96,8 

46198 r*-cp*' jo- -on*'.**' : : ■ 

46200 DCrCRl- 12>«6.<i4,225, I l 6.54, 48. 48,4 

B 

40216 rjErCR*U3>"48.48.48.48,56,28,6.e 

48226 RI«CR*i I2)*CHI*CPI' 13' 

46238 OEFGRI' 14 >>0, 8. 28, 46. 70,6. 14,22 

46246 ft*"CP*<]4>.CHftfr! 

48230 DEFCP* ' 151*6. 3. 30. 14,6.6,6,6 

40260 DEFGR»'16 i "6,6,6,6.7,3, 1,9 

40270 DEFCRI'17>-9, 64.224, 1 12,49, *8, 48,4 

8 

40280 DEFCR(<18>-48,48,48,48,36, 156,8.0 

40290 N».GR«U3.*CHMGPI' 1 6 ) 'CHPI < ] 1 ■ *CP 

*<I7>'CHI»CP«< I0> 

40300 DEFCRc: 19<-8. 10,28,44,96,96,96,96 

46395 DEFCR«(28'"96, 96.96, 96-34,28,8,0 

46318 C*"GP*' 19"CHI.r,P|. id ■ 

46320 DEFCR* (21 "0.28,24, 16,0,24,24,24 

46338 I*-CP*'21'*CHfCR*'3> 

40496 LOCRTE12,10,9 



416 



R1NTL- 



;1818 PRINTCHP*' 11 '10H 

41628 PPINTCHPK 1 1 'fSI! 

41030 PPINTCHPC 1 I 'IF*; 

41640 PPINTCHP*. II -ICt) 

41630 PRINTCHRI' 1 1 'ILII 

41068 PRINTCHRU I 1 .1DK 



■ ;fi; 



46398 OEFi 



-182,162,192, 102. 



RIN 

41079 PRINTCHPI' 1 1 

41B08 PRINTCHPI. I 1 

41398 PPINTCHP*' 11 'i^*J 

41108 PRINTCHPK 11 ,;n«: 

41 1 10 PRINTCHPI' 1 1 <ICIi 

41126 PRINTCHPI' 1 1 >fOII 

41138 PPINTCHRt' 1 1 l| III 

41148 PRINTCHRI' 11 IfSfJ 

41138 LOCHTE 16, 13:PPINT-PR£SENIEl- 

42000 FORT- 1102900! NEXT T! JTTRB1, HCLSiLO 

CflT£12,12,8lPRINT'HMfi-eL0K- 

42818 FORT- 1TO2660I NEXT II nTTP80. B> RETURN 



URANIA II 



MZ700 



Ce jeu est un programme de bataille de I'espace. 

Francois BAUDOIN 

Le joueur pent s'H le desire, avoir un apergu rjeiailte de )a regie 
du jeu. en appuyant sur | , pendant la visualisation de la page 
de presentation le jeu pent se presenter sous deux tormes dille- 
rentes: 

1 -vaisseaux ennemis tous blancs 

2 -vaisseaux ennemis de differentes couleurs. suivant leur posi- 
tion sur l ecran 

II offre de plus, 7 niveaux de difficult^, soil au total 14 vanantes 
ditfdrentes. 



Pour le choix du niveau de ditticulte. tapez la louche CR apres la 
selection, 
ex, - 5CR 

Le signe - 5 seiectionne la presenlation de jeu n* 1. 
5 selecttonne le niveau 5 

Le joueur pourra s'll le desire, modifier les ditf6rents niveaux de 
ditficulie en changeant la valeur des variables dans les ditfe- 
rents sous-programmes d'initialisation debutant a la ligne 
(5660). 
Attention: pendant le jeu, il ne taut pas garder enfoncees les 

touches de mouverrienl • ■ ou la louche "espace" pour le tir; il 

taut les relacher sans cesse. 




•eee (["iiiiiinitmiiiini 

.-■■ .' . !■ | ■■-■■■■ ■■ -; .mini t ■ 
•628 RENlfViTEUR F-BAUDUIN" 
1030. UpTWUTCUR D-BftlCUIM*« 
•043 RfitBJutiar* n?-?ee**i*" 
■ese «nm«iiiiini«iii'»> 
■.«? e^i 
'e?© Din aec?3 
1000 on crrcr core tbso 
ie98 oosue 74 :o 

.-■ G«--our sosue seae 
' ■ i a oosue S33S 
.• 

■ ■ ,: ■ -..■: ■ -...■■■ 
Ti40 if gg<8 g-osjb 3278 

nee 8rt-a;22-e;«R-eii*5K-e:x*2:o-a 

:i?8 GOSUB 4B6a 

nee gosub 2?a 

I 198 IF MO! GOSUB 6930 

1288 GOSUB 2328 

•2-8 G0SU8 S389 

1228 FJ-FJ-l 

'238 IF FJ<48 GOTO 1218 

-.248 IF FJ<41 GOTO 1288 

1238 FJ-8.-G0T0 I 138 

t268 ENO 

'228 REn**in»*t*«»«i**i»«»*l»M* 

■288 REr INITIALISATION 

1298 RErt«« ******.«« ««»«"***** 

1388 IF 86<a r«N COLOR,, ,L 

1318 WHHT*B* 

1328 COLOR, , ,L:K>8:0-8 

1338 IF SG>8 GOSUB 7888 

1348 IF G(»>4 GOSUB 6380 

1358 IF 22.-0 GOSUB 2228 

1 363 If X>4 GOSUB 1738 

■378 IP X>? GOSUB 4750 

'388 IF »ia GOSUB 6388 

-338 GOSUB 1238 

i«88 GCSUB 1848 

1418 GOSUB 4868 

M28 CURSOR B.i^PRInTCI.L]' E4E4E4E4E4E4E 

4C4E.4E4C4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E 

*€4£4E4€4£4E4E4E4£4£^£4C4€4 ■ 

:433 «-$*; 8 
448 ?_«0m*B 
1458 POKE ft, 291 

1468 If (C-l)TXX-l) GOSUB 4818 
1423 IF [£-l)TW"l GOSUB 4370 
1«88 CURSOR 8,22 PSIf T[2, L J'E3e3E3E3E3E3 
E3£3E3C3C3t3£3E3€3C3£3E3E3t3£3C3E3E3E3£3 
E 3£3T3E3E 3C 3E3E 3£3C 3E3C3C3E3 " 

-498 c 



1528 ?tni<mnimimn 
1538 BET «• 

543 IF ««-'3- GOSUB 157B 
1558 IF M-'i- GOSUB !62B 
1568 RETURN 
1573 POKE «,a 



( REnai 

( CURSOR 0,9 

I PRINT l.4C,t.J "tfeiC3C3C3C3C)e3C3F8' 

I PRINT [«,L] "C3 SCOPE- t>' iO 

I POINT rr»C,L) ■'ECC4C4C4C4C4C4C*C40'>■ 

! RETURN 

I CURSOR 18,9 

! PRJNTtPO.LJ-C? C5" 

9 CURSOR 18, l 

I PRJNUPO.U-C? BECORO i Wi«IGfl 



I CURSOR 

! PRlNTCftD 
) RETURN 
! RQtUftMl 



1363 OD'188 



9,2 



2838 

2849 
2858 

2368 



GOSUB 1738 

POKE B,8 

IF W-31 GOSUB 3438 

GOSUB 7328 

GOTO 1 ISO 

POKE 9,8 

GOSUB 232E 

GOtO 1198 

Riniimti/ittitiiiiititiiitti 




2878 Utrnuiiiitiiiim iiuiii 
2880 CURSOR 18, 13 

2898 print if, u -FScscacocpea* 

2188 CURSOR 18, 14 

2118 PRINTtf .Lrcccccccccccc- 

2128 CURSOR IB, IS 

2133 PRIhHE,LrFECeC8C8CBC3- 

2148 RETURN 

2158 CURSOR 24, 13 

2168 PR1NT(F,LJ"FSCBC8CBC8E3 

2178 CURSOR 24, 14 

21B8 PRINTCF.LI-CcecCCCCCCCC- 

2198 CURSOR 21, 15 

2283 PRINTr.E.Lj'PECSCacaceCS' 

2218 RETURN 

2223 CURSOR 17, 13 

2238 PRINT[F,L]-'FSC8C8CBC8C3' 

2248 CURSOR 17, 14 

2258 PRINTCF,L3"CCCCCCCCCCCC- 

226B CURSOR 17,18 

2273 PRINTr.E,LJ , FEC9C8C8C9C9" 

2288 RETURN 

2298 R£n**l 

2388 REP »vt coucoupic 

2313 REn*«**«***««**«"»"**«' 

2328 K-K-H 

2333 IF iNTCK.'RSJ-tK'RS) GOSUB 2358 

2348 RETURN 

2358 FOR I-N TO n STEP -1 

2368 iF PEEKtD-193 GOSUB 2430 

2378 NEXT I 

23S3 n-n*p 

2398 N=N»P 

2483 m="-cb" 

24 IB rlUSIC K* 

2420 RETURN 

2438 POKE 1, 

2440 J-I»P 

2450 IF J>5ie49 THEN GOSUB 2SI8 

2468 POKE J, 199 

2478 RETURN 

2488 R£rttJUUW*****U****JjUM** 

2430 REH pm* conon t t\f 

2509 KPUlttUlUtUUittlUi 

^sia Ar-AF-i 

2523 IF flF-8 GOSUB 2568 

2538 IF P.F>0 GOSUB 4B68 

2548 GOSUB 1220 

2558 GOTO I I 78 

2563 FOR G-S396B 10 51128 

7573 POKE G,8 

2588 NEXT G 

253B poke 54aee, 139 

2680 POKE 54040, 162 

2610 FOR 1-9 TO 2088 

2623 NEXT I 

263B FOR G-54930 TO SI I 27 STEP 3 

2640 POKE G.2B2 

2850 NEXT G 

2660 CURSOR 16,5 

2670 PRINTCM 

2688 CURSOR 16,6 

2638 PR1NT(hB,L 



9582" 



33C3C3 F? F7 F7 F? C3C 



2788 CURSOR 16,7 

271B PRINTCAB.D- Of * 

2723 CURSOR 16,8 

2733 PRINTCPB,!.)" C3 99-"8C 'E 

27«B CURSOR 19,? 

275B PRlNTrRO.LJ'FIN DU JEU" 

2760 CURSOR 8, IB 

7778 PRlNUOO.LrPPPurE! SUR N'inPOPTE 

UELLE TOUCHE POUR REJDUER' 



K«--«Gr' 
TEPPQ 7 

NUSIC F*,G«,H», li,J*,K4 
«R"AR» I 

IF flR<3 GOTO 7B6B 
GET f\* 

IF M--9- GOtO 2968 
ir M-" COfO 23BB 
JF D>AE(GA) INEN FiECGflJ-O 
lO'iUB 1840 
GOTO I 138 

■ ■.'■! frtH n£(Gfl)-0 
f/J'.UD 1B4B 
0010 1 1 18 



2838 
7388 
2918 
7370 
7938 
2948 
7958 

. -,.> 

. no 

29SB 
30B8 



'■« MHI.II.IIMIIIIIIIII 

1030 ■ ,ii>,.. P8JNT B- 
,,■1.. ,-,.■ ■-. ■.'■■ 

3858 PR|N1[3,D DE Lfl FLOTTC INrFRGALftCI 
[QUE, 

81 B ■■...;:, BASt 01 I 

... ,■ .■,■<, | HWVtjfiseuM UMNItHSr 
U8B POINI iPBIftl pRI(*1 

■:--i'6. ; i 'ui , i :../ Id touoDi '••po 



EM) 



3! 18 PR1NH6, 1 1"l»« looen«« f ■> pour vo. 

3128 PRINIt6,U'<(.plac.r ««r« lo »oocM 

3138 PR!NT[6,1 i'vrt lo droit*.' 

3148 PRINT ;PRlr<T .PRINT: 

3158 PRINTF.?, 1 r BDNNE CNWCEK. 



3168 


SR«»- f»2- 


4288 


3173 


Of«-'-01'Cl-DI-EI»Fl'El fFI-Gl'Pl 


42!3 


3183 


TFJ1PD 1 


4228 


31 ■•' 


nusje £R«,of* 


4230 


3288 


FOR 1-8 TO 80BB 


4240 


.' I ' i 


NEXT I 


4258 


3228 


G0SU8 7858 


4260 


)23B 


RETURN 


4770 


3240 


R£rn***«**»*»±**»±lIM*****"« 


4788 


3250 


REN a.bL,i ttu j.u - pIW»auwt-«) 


4298 


3260 


REf1»t±i**lti»*H»»t**I*t «"**** 


4308 


3270 


COLOR, , ,8:PRINT"8" 


4318 


3288 


FOR G=53508 10 54200 STEP 24 


4378 


3230 


POKE G, 1 39 


4330 


3388 


NEXT G 


4340 


3318 


CURSOR 8,3 


4350 


3378 


PRINTl2,3r'PREPi4RE? UOUS ftU COflSM! 


4368 
4370 


3338 


GN«--B2- 


4308 



334B DFi-'R" :KX-e 

33SB TEflPO 4 

3360 nUSIC GH«,Df« 

3378 KX»KX*1 

3388 IF KX<6 GOTO 3358.COL0R, , ,L :PRINT"8 

3338 RETURN 

3480 REn*i**tl*lt**t*l*t*ltttlil**** 

3418 RET 'In d» »BneM - rtiulull 
3423 qFJ1fff*««*t*1l«f*********— *—* 

3438 0-X»Ct5B-0]*I2) 

3440 IF 0<8 THEN 0=8 

3450 D»D'Q 

3468 IF 0>N1 GOSUB 4468 

347B FOR G-53703 TO S412? 

34B3 POKE G.B 

3493 NEXT G 

35B8 zz-a 

3318 IF 0>i4E(Gfl) THEN r>£CGfl)-0 

3578 CURSOR 8,5 

3538 PRlNT[2,L)'Ufl 'fX'I-M flTTnQUE ENNE 

"IE EST inniNENTE!" 

3548 PRINTiXX-X-1 : CURSOR 3,10: 

3558 IF XXOI GOTO 3578 

3568 PR]NU2,U'C0nPTE-RENDU OU l.r COMB 

AT.-":GOT0 35BB 

357B PRINT[2,LrconPTE-RENDU OU"iXXJ''i*P 

t COTlBflT:" 

35BB PRINT14.L)- E4E4£4E4;E'l£4E4E4E4e4E 

««4£«4f1E4£4€4£4E4E4£4E4£4E4E4E4 " 

3530 PRINT ^PRINT(3 l L.]'*N0nBRE DE TIRSJ'iO 

3688 PRINTIBAI'^NOHBRE DE TIRS fiU BUT:3I 

3610 PRINT : PR INT 1 3, Li' PRECIS I ON:' 1 

3678 T-C31^O)*I0B 

3638 PXINTOjLITl' *" 

3648 PRINT iPRINTiPRINT[2,L.l"80NUSi"jO 

3658 Gfil-"-H3" 

3660 NR«--*E2" 

3670 jR«-"E3-:K*-8 

3888 TEHPO 5 

369B nUSIC GR«,MR>,JR( 

3730 Kt-K*+1 

3718 IF K'<S GOTO 3680 

3720 FDR I -8 TO 1 BBB 

3738 NEXT I 

3740 X-X* I : 

3750 GOSUB 3978 

37C0 F'Ftl :t»E»l :L-L'1 

3778 «e-P0i 1 :«C-F>C' I i«0-fiD* I 

3788 IF F>? TNEN F-2 

3793 IF F>B>6 THEN P-B-B 

3888 IF nC>6 THEN ftC-B 

3818 IF 00>6 THEN «D-B 

3020 IF £>7 THEN E-l 

3038 IF L>1 IHEN L-0 

3B40 If E-F THEN E-E'l 

3650 IF PB-L TNEN ftfl-Cil 

3B60 IF rt[l»L ImFM fiD-l-? 

3870 IF PC-1. THEN flC-PCtl 

3888 IF E-L THEN L-t* I 

3090 IF F-L THfN F-F*l 

]BM JF L.'8 Ihln II-7 

1910 If L"l ii".n i :-■-. 

J';.'fi PR INT -0 

3330 GOTO I 188 



REP 






3948 


t.fn.»tit».tt. 


■ tin 


■ HIlllMillil 


IS iQ 


Rtn o u »«*rii 


Ion o 


la tfi'riewUi 


■:":.■ 


01 <•■. ■.*.<•• 


yiu 


tttitttitiimt 


, ,.. L . 


IF RS>CC IHEN 


oosua 


4BB8 




If ft! 


THEN P-P<l 


n m 


RETURN 






■IRilL) 


if iM^m-cx'tr) 




4010 


r p, . . 






■.■.,' 


H [URN 








u. llnnillii 


• iitt 


miimnim 


■ 040 

... a 


«n mllligv 




.•ru. 


;- "F-3 GOSUB 


1I0B 




40 >0 


■ ■■ ■■, |0 b 


1138 




1B9B 


H i» -1 HSUJ 
RJ luftN 


1I3B 




4138 


POKi. b1IJfl,28 






4]|0 POKE J4177. 28 







J RETURN 
) POKE 54177,781 
) RETURN 

i POKE 54170,281 
) POKE 54172,281 
i POKE 5*174, 201 
) RETURN 

) £?Enillt»*ili**tlt*t*t»l«»H**t 
REn i";cM»i P*rt* voifi.au 

^Eniiiiiitiitititttittiiiiiiii 

GOSUB 5463 

CURSOR 19,6 

PRlNT[2.L]"WXlS UENE2 OE PERDRE ' 

CURSOR 19,7 

PRINT[2,Ll-L'UNE OE UOS UNITES' 

CURSOR 5,9 

PRINTC4,L]' , PREPPRE2 UOUS P." 

CURSOR S, 10 

PRlNHl.LJ-REiVFRONTER L'ENNEnil- 

SR»--G- 



:"-:;t- 



i«5' 



nUSIC SR*,ST*,S04 




IF KK<6 GOTO 1349 




FOR I-9 TO I58B 




NEXT I 




GOSUS I 738 




U'iZ*} 




RETURN 




REniititintttittii 


titititiitt 


REn valii*au *upp 


• ptmalr* 


-( iit.iin .iii.i. i . 


tilttltltli 



4450 

4460 BA-BA*! 

4478 IF BN-1 G0SU8 4130 

4483 RETURN 

4433 CURSOR 18,6 

4588 PRlNTC2,L:-FELICITi4TI0NSt- 

4518 CURSOR 5,7 

4513 PRINT[2,L]'U0US DISPOSE! OES TVMNTE 

4530 CURSOR 5,8 

154B PRlNTl2,Lr , 0'UNE UNITE SUPPLEnENTfll 

R£." 

4538 CURSOR 5, 18 

4560 PRINTt4,LrPflEPP-RE( UOUS P. REPRENOR 



■=:-.no t 



RINT14, 

•-■■-co- 



.J''LE CONBflTI- 



•1606 T4--E0" 

46IB U»-"-B0" 

46 ?0 TL.NPO I 

4630 nUSIC R«,T*,U«,R«,T*,Ut,R*, r*,U4,Ri 

, 14,U»,Ri,Tt,lJ«,P*. T*,U4,RI,T1,UI 

4648 nF-nr-i 

4650 GOSUB 4068 

4660 FOR G-53443 TO 537B8 

4670 POKE G,0 

48B0 NEXT G 

4398 RETURN 

4700 REn*«tl»*»*i»il»**iiMil«tii««*iI«* 

471B REM control, q'flotiaf.* iran.pori. 

4773 RF-lititll»»*t»Itt.»*t»il**»*«*»««* 

fl ?3B ir ZZ<.-t GOSUH 7888 

4748 RETURN 

4750 IF 7*<*2 GOSUB 2158 

4766 RETURN 

4778 REnti***»»*»»*t»».»»«i*li<*i.il*** 

4788 REn initiaiUallon •■cadrilt* 

4790 REn «nn-nl- - C2 u*vlam«t) 

48B8 REn*tHt***ti*ltt***»itlttmtittt 

4810 n-33449 

4020 N-33563 

4038 S-53483:T-S3SB3:U-53543 

4B48 FOR G-ft TO S STEP 1 

4050 POKE G, I 39 

i860 NEXT G 

4870 FOR G-fi TO T STEP 3 

4888 POKE G, 133 

4830 NEXT G 

4980 FDR G-T TO U STEP 5 

4918 POKE G, 133 

4928 NEXT 

4930 FOR G-U TO N STEP 3 

4948 POKE 0,199 

4958 NEXT G 

496B RETURN 

4970 n-53443-N-S3505iS-33165'T -53535 rU-5 

3543 

4980 FOR G-n TO S STEP 3 

4990 POKE C, I33 

5080 NEXT C 



En raison 


de la 


longueur 


du lis- 


ting, nous 


passe- 


rons ce 


pro- 


gramme 


en 2 


fois. 





A SUIVRE 



SYNTHETISEUR 



PC 1251 



Le PC 1251 n'etait deja pas muet mais maintenant, il 
peut (entin) rivaliser avec son grand frere le PC 1500. 
Attention les oreilles! Mustciens, a vos claviers 

Patrick DELHINGER 



Foocttoonemenl Ce programme de synthetiseur etant pour sa partie 
vwe en LM il vaut mieux avoir de quoi (aire un "ALL RESET" a porte 
de mams afm d'arreter un son trop tong (faire ALL RESET en mam- 
tenant une touche enfoncee). Les ordres de commandes qui vont 
survre sembtent rebarbatifs mats on s'y fait Ires vite. Ce programme 
peut memorise* 850 notes differentes (c'est tres long b program- 
mer) Les correspondances entre les notes varient et les frequences 
restent a (aire (mais on sen passe ires bien), Sachez tout de 
meme. qu'en GBAND. PLAY w. 140 correspond a un re medium et 
que lecart entre les notes sont d'environ 40 points. 
Vod la liste des ordres avec teur syntaxe. (N.B. les ordres simples 
(sans chitfre) peuvent etre abreges a 3 lettres. mais pour les autres, 
if est tres important de respecter la syntaxe). 
A) Synthetiseur non memorisable: 

GRAPH: met le display (LCP) sur "ON". Fonctionne avec tous les 
codes du A. 



NGRAPH met le display (LCD) sur 'OFr. 

CONTINUE: produit un son altere continue. 

REVERSE: produit 2 sons en meme lemps, pour foncttonner avec 

tous les codes de A 

CLOCK STOP: produit un son interrompu. 

BAND SPC:0 — aigue 

1 — plus grave 

2 — de plus en plus grave 

3 — de plus en plus grave 

4 — t tres grave. 

INVERSE: inverse le sens de modulation repeat SPC n (0 — 255) 
nombre de repetition de la sequence. 

Module SPC n (0 — 255) sequence. 01 tres rapide. 255 tres lent. 
Attention, plus la bande est basse (ex. band 4), plus il y a de repeti- 
tions et plus la modulation sapproche de 255 (00), plus le temps 
d'emission du son sera long (jusqu'a plusieurs minutes). 
Brepeat SPC n (0 — 999) nombre de repetition de la sequence 
entiere. 

End: question a 100 points (marche avec B et A. 
B) partie memorisable (note simple "non modulee"). 
Play, nnn (duree), xxx (hauteur du son). 

Les 2 codes sont compris entre (0 et 255) et doivent obligatoirement 
comprendre 3 chiffres (001, 002). 
hauteur; 001 etant le plus aigue, 000 etant le plus grave. 



du(6e 001 te plus court et 000 te plus tong. 
ABAND: son aigue 
GBAND: son grave 
PMEMO: joue lair enregistre 

Tous ces ordres sont a entrer a i apparition, de "S > - ". un par un. 
on peut les programmer en reserve sans aucun proWeme. o© pro- 
gramme occupe tout la memoire du PC on ne peut ni le merger nt 
le taire cohabrter avec un autre. 

Attention au data's, une erreur peut etre fatale au programme On 
peut lancer cefui-ci en SHIFT "S" {seulement lorsqu'rl a deja Otft 
lance par un 'RUN" preced emment). Une petite astuce des qoe to 
programme est inlroduit. faire Peek 50915. Peek 50916 et noter tes 
2 valeurs trouvees (adresse de fin du programme, cea avant de to 
faire lourner bien sur). 

Comme cela si le programme saute pour une raison ou pour une 
autre (erreur dans les datas) vous pouvez la rattraper en "Pokart": 
— BS31.224 

50915. valeur relevee, 

50916, valeur relevee. 

Les programme est ators entierement rattrap6. il peut-etre modif>e et 
sauve. (ceci meme apres un ALL RESET). 

N.B.; pour sauver une music sur cassette, faire: CSAVE AA 1 BEOO. 
& C500 pour le loader, faire: Cload M. 



[11*11 i: MUKT ' // 
SYHTHETISEW'/*! 

:«.. tiiEB 

2:WTft Sej.196.l82.t3fl 

.t3*.f.:.i5-.t&9.tee 
•t:f.&*E.tee.t«E>tee 

.t«£.te«.t<E.eee 
3::^*a t*£.tes.s6:.t;e 

.;:e.ii:5.s83.t5:.s5* 

.t2D.tlC.tC3.tW 
4:DATA t22.S3T.te3.S85 

.s12.t5r.t69. tea. t3F 
.t«£.a.t*t.e.tsi.;4- 

tDF.tC3.t29.tflE.t37 

5:3&T6 1*0.188.78.198. 

35.255.1*8. 198. T9.18 



8.a.S8.;5ii58.:48.:e 

8.78.188.35.255 
&:9ATA 78.188. 1*8. 255 
7: CLEAR : RESTORE J 
=0R A*8 TO 55: BEAD 
B: POKE tC5ee+a.B: 
hEXT A: CLEAR 

18:CALL tllE5: &EST0SE 
5: POKE tC559.255: 
FOR A»l TO 12: 9EAD 
B.C: POKE IC527.C: 
POKE (CS2E.B: CALL t 
C526: NEXT A 

:::-S' ClEA? 

12:H:h 3*<8>»22:C=t3DFE 

::>c 
i5.-:nput "S> *:BS(9KA* 



ItlDf (B*(8). 
A* 



>3)i 



0OT( 

i:GOT0 15 

H'EHD' EKD 

i:-C0N- POKE lC515.tl8 

: GOTO 15 
i:-SPL- CALL 6C588: 

ilflIT 58: PRINT * • 

••FINI«»': GOTO IS 
Ft 'REV* POKE tC5I5. 

PEEK tC5I5*S2: GOTO 

15 
i:*GRA* POKE tC515. 

PEE< KCSlSMt GOTO 1 

5 
i:**GR* POKE tC315. 

PEEK IC515-1: GOTO 1 



69:*CL0' POKE tC515.28: 

GOTO 15 
65:*3AN'A= VAL r>I7J« OS 

<6).6.1): ON A GOTO 

1*8. :*5. 158. 155 
66: IF fts8 POKE SC58C.78 

.9.78.8.78.8.78.9: 

GOTO 15 
67:=fiuSE 'PRO ERROR*: 

GOTO 15 
78:*REP'A= VOL flIBf <BS 

<8).8.3): IF A<256 

flKD A>=8 POKE SC581. 

A: GOTO 15 
7UC0T0 6? 
75:'H0B'A= VAL f»ID* (Bf 



<9).8.3>: IF A(256 
AKB B)=8 POKE tCS83. 
A: GOTO IS 

76: GOTO 67 

88:-BRE*A» VAL "ID* <BI 
<8).9.3): POR B«l TO 
A: CALL (C588: NEXT 
B: PAUSE * *-»FIn'i» 
•••: GOTO 15 

98:*PLA'A> VAL HID* <Bf 
(8>.6.3).B= VAL HID* 
(B*(8).18.3> 

95: IF (A<256 AND A>=8> 
AND CB<256 AND 3>=8) 
AHB C<tC4FD POKE SC5 
27. A: POKE SC52E.3:C 
=C*2: POKE C.A.B: 



Cfi^L SC526: GOTO 15 

CGOTO 67 

i:*A3A* POKE 1C539.8: 
GOTO 15 

l:-G3fl* POKE tC5!9.255 
: G0 T 15 

i:*PfE'E=C-D: ^OR A=8 
TO E STEP 2: POKE tC 
527. PEEK <S3£88*A>: 
POKE SC52E. PEEK (S3 

Eee*A»:>: ca>.l tc526 

: NEXT A 
liPftUSE ' ...f;s>«. 

•: GOTO 15 
i:*C0R* POKE SC527. 

PEEK C: POKE SC52E. 

PEEK (C*l): CALL tC5 



26: BEEP 13 PAJSE • 
//O.K.//':C«C-2: 

GOTO 15 
IMl'IHV* " PEEK tC518- 

142 POKE SC518.t*3: 

GOTO 15 
135:P0KE tC518-t42: GOTO 

15 
:*8:P0KE tC583.255: GOTO 

15 
1*5:?0KE IC58F.255: GOTO 

15 
158:P0K£ tC5l'..253: GOTO 

15 
155:P0KE tC5:3.235i GOTO 



ALZAN 



Perdu dans une ville, saurez-vous en sortir indemne? 
Heureusement pour vous, ALZAN est situe a I'interieur 
d'un SHARP PC 1500 et les morts prochains qu'il aura 
sur sa conscience ne seront que symboliques... 
ALZAN est un jeu d'aventure dont le but est de sortir 
d"une ville. 



5:REn QLZfiN: JEU 
a WEMTURES SU 
R PC- 1588 
10:REf1 COPYRIGHT 
CMRISTOPHE t J 
OCQUES BERGERO 



EL 
30:REn FIXflUDN D 

ES CONDITIONS 

OE JEU 
48:UPIT I00:R=2O: 

0=1'1:U=43:Q^?7 

:C=13 
50:Din SC1J),C<3) 

,P*(2)M, 0(0>, 

0(0),0»(0)»28, 

n«(8)*18, C*<0) 

•32 
52:0in U*(4>»2,E« 

(8X38 
55: FOR X^ITG 0: 

repo a<x;,o«cx 

):NEXT X 

88:R0-=l:F0R X=1T0 

0:OCX)=0<XJ: 

NEXT X 
188: IF S<2>=0GOTO 

228 
120: IF $<3)<>0GOTO 

220 
I38:BEEP l:PRINT " 

IL FOIT NOIR.. 

-LUniERE?" 
150: GOTO IE3 
220: SEEP 1 : GOSUB C 

8E3*18»RO> 



C.J. BERGEROT 



Mode d'emploi: RUN < ENTER presentation et debut du jeu. 

•Lorsque le ? apparait, c'est a I'utilisateur de jouer. 

-Le dialogue avec PC se fait a I'aide d'au plus, deux mots separes 

par un espace (ex, OUVRIR COFFRE). 
-Pour vous diriger. vous disposez des commandes: 

N: Nord, E: Est. S: Sud. O: Quest. H: Haul. B: Bas. 
•Deux commandes particulieres vous permettent de faire le bilan de 

voire situation: 1 = inventaire. REGARDER : lorsque I'utilisateur ne 

sait plus ou il en est. 

Un conseil: ne pas se pourvoyer tout de suite dans les details, de- 
couvrez plutot la ville dans son ensemble. 




388: F=B 

3!0:FOR X=1T0 
32B: IF 0CXJOR0 

GOTO 580 
330: IF FO8G0T0 48 


348:PRINT "IL Y A: 

358:F=I 

488:PRINT 0»CX> 
588: NEXT X 
JB80:T=i:RESTORE 

12018 
1828:G0T0 2818 
JI88: IF CC1)<>9 

LET C(U=CC1 
J-I 
II05:IF CC2JO0 
ONO S<3>=1 
LET C(2)^CC2 



1128:BEEP 2: INPUT 

1I50:Y=0 
I120:P»(2> = "00'• 
1200:FOR U=1T0 2 
1210:GOSUB 6E3 
1228: IF Y>=LEN (Y 

*>&0T0 1380 
1238: IF P*CU)="08 

•'SOTO 1218 
1248: NEXT U 
1388: IF P»(1>O"0 

0'GOTO 1508 
1318: PRINT -PPRDO 

N??" 



1638 
1640 
1650 

16 



2128 
2138 
2308 



GOTO 100 
RESTORE 110] 
8:F0R X=ITO 
R0:REO0 n*(0 
):NCXT X 
Z=l 

T»=MID* (n*( 
0>,2, 2> 
IF T»=-88" 
GOTO 1380 
IF TtOPtd) 
GOTO 1780 

po=uol cniD* 

(rt«C0), Z*2, 2 

)J 

:G0T0 180 

:Z-Z*4 

:G0T0 1628 

: T=8:RESTORE 
13810 

:no^8 

:CP-0 

:REOO C*C8):C 
P=CP*1 

: IF T=8G0T0 2 
380 

E*<0)=C*<8> 
GOTO 2610 
IF CP<=RSOT0 



2310: IF nftO8G0T0 

1E3 
2328:BEEP IrPRJNT 

"UOUS NE POU 

UEZ PQS" 
2338: IF UOL (P»<1 

1XI3PRINT " 
ftLLER POR L 



2428 
2430 



2802i 

2810; 

2820; 
2838: 
2388: 



GOTO 100 

if nio» cc»c 

0), 1,2K)P»( 
DGOTO 2188 
Y*=niQi CC*r. 
8), 3, 2) 
IF Y*O"80" 
PNO Y«t>P*<2 
)60T0 2108 

E»(8)=nio« < 

C*(8>, 5, LEN 

<C»(8)>-4) 

E=l 

IF lilO* <Ei< 

8), E, !)■■." 

THEN 3018 

ty=osc tnmi 

(E«<0),E, 1)> 
-65 



GOSU8 <2980* 
18TTY) 
IF OK30GOTO 
2188 
E=E*3 
GOTO 2788 
IF N=R0LET 
Ksls RETURN 
OK=8: RETURN 
IF 0CN>=R0OR 
O(NJ<0LET OK 
=1: RETURN 
0K=8: RETURN 
IF 0CNJOR0 
UNO 0(N>>=8 
LET OK«i: 
RETURN 



2971 
3010 
3188 



0K=8: RETURN 
IF 0CNX8LET 
OX=I:RETURN 
OK=8: RETURN 
0K=SCNJ: 
RETURN 
IF S(N)=8LET 
OK=l:RETURN 
OK=0: RETURN 
IF C(N)=lLEf 
0K=l:CCN)=8: 
RETURN 
OK=B: RETURN 
IF RNO I80<= 
NLET 0K=l: 
RETURN 
OK=8:RETURN 
nfl= I :£»£♦! 
IF nio« CE«( 
e;,E, i>-".- 

GOTO 2188 
:TY=OSC (niD* 
(E«(8),E, 1 )) 
-65 
: IF niO* CE»( 
8),E*1, I)<>* 
. 'LET N^UOL 
(niD» (E*(0) 



i : GOSUB (4E3*I 

80»TY) 
i: IF BR=108OR 

BR=IE30R BR^ 

I I00GOTO BR 
i:E=E+3 
:G0T0 3188 
:BEEP J: PRINT 

"UOU9 TENEZ: 



4020:F=] 

4038:FOR X=-1T0 
4048: IF O<X>>=0 

GOTO 4070 
4050:PRINT Ot(X): 

F=0 
4820: NEXT X 
4880: IF FO0PRINT 

"RIEN" 
4895:BR=188: 

RETURN 
4180: IF S(l)<5 

GOTO 4)40 
4110:BEEP i:PRINT 

"UOUS NE POU 

UE2 PORTER P 

LUS" 
R=18 



4120; 
4 130; 
4)40; 

4150; 
4)68; 

4178: 



RETURN 
IF 0<N)= 
GOTO 4 18' 



0<N 



-1 



42,28: 
4230: 
4240: 
4 258 



St J J-=Se l > + l 

RETURN 

BEEP irPRlNT 

"UOUS L W£Z 

DEJA' 1 
GOTO 4)20 
IF 0(N)=-1 
GOTO 4240 
BEEP l:PRINT 
"UOUS N 0UE2 

pos aE-,o*< 

NJ 



8R=188 

RETURN 
0(N)=R0 
S<1)=SCI ) 



PC 1500 



4260:RETURN 
4308:BEEP 1: GOSUB 

C7E3-*I8«N): 

RETURN 
4488:S(N)«l: 

RETURN 
4580:S(N>=0: 

RETURN 
4688:C(N)=U0L < 

HID* CE»C8), 

E*3, 2)) 
4610:E=E+2 
4620: RETURN 
4700:X=O<N> 
4718:0(N)=0<N+l) 
4720:OCN*1)=X 
4738: RETURN 
4800:OCN)=RO: 

RETURN' 
4900: IF 0CNX8LET 

S(1>»S(1)-1 
49I0:OCN)=0 
4920: RETURN 
5000: RO-N 
5818:RCTURN 
S108.-BEEP 1 :PRINT 

"0 PCCOR0■■ 
5200:BR=1E3 
52I0:RETURN 
S300:8R=) 100 
53I8:RETURN 
5488:BR=100 
54 10:RETURN 
5588:B£EP 1: INPUT 

"ETES UOUS S 

UR M ,U*(1) 
5530: IF LEFT* tU* 



CO 



no 



LET I 

RETURN 
5688: ENO 
5998:REf1 S01SIS 

ES 4 PREMIER 

ES LETTRES 
5995:REn DES HOTS 

INTROOUITS 
6888:F0R G=1T0 4: 

i~ i ( b ) = " " : 

NEXT G 
6815:P*(U>="00 M 
6020: GOSUB 6608 
6825: IF ENC >8 



RETURN 
6B38:F0R Q=1T0 4 
6840:u*(Q)=niD* ( 
v*, Y, i):u*-u 
*(1)*U*C2)'U 
*(3)*U*(4> 
6050: GOSUB 6500 
6868: If ENO8G0T0 

6100 
6070: NEXT Q 
6888: GOSUB 6588 
6890: IF EN=0GOTO 



6100: 
61 10: 



6)38 
6148 
6208 

6210 
6588 
6510 



IF U*=- * 
RETURN 
RESTORE 1081 
0:FOR Q=ltO 
U:REP0 U* 

if u*=nio» < 

U*, 3, LEN U»- 

2) GO TO 6288 

NEXT Q 

RETURN 

P*<W)=LEFI* 

CUt, 2> 

RETURN 

Y»Y+1 

IF Y>LEN (Y* 

)LET EN=1 
:IF ENO0 

RETURN 
: IF MID* <Y*. 

Y, 1)*" -LET 

EN=1 :G0T0 65 

48 



6540: 
6688: 

B610: 



IF Y>LEN (Y* 

)LET EN*l: 

GOTO 6620 
6615:EN=8 
6628: IF EN*I 

RETURN 
6638: IF HID* <Y», 

Y, IJ-" "GOTO 

6608 
6648:RETURN 
7000:REn fiFFICHAG 

E DES ftCTION 



HEBDOGIQEL 27, rue du Gal-FOY 750X)8 PARIS 

VOUS POUVEZ VOUS ABONNER AU TARIF PREFERENTIEL DE 340 FRANCS POUR 52 NUMEROS AU UEU DE 
52 x 8,00 = 416 FRANCS. ABONNEMENT POUR 6 MOIS : 180 FRANCS. 



NOM : 

PRENOM : 

ADRESSE: 

REGLEMENT JOINT : □ CHEQUE D CCP 



MATERIEL UTILISE : 
CONSOLE: . . 
PERIPHERIQUES : 



THE WONDERFUL ADVENTURES OF 
MICHE AND MICHA 



PARAUOIM from FROGGY SOFTWARE 

for /1PLLE (all kinds) 



"-So. Micha. i heard you have 
been reformed (or nanisme. 
which is usually referred as 
'dwarfry"? 
■Yes, I did And it is ze raison 
for laqueHe I am completely de- 
pnmed 

-You mean down'' 
•Completement down... 
•That lombe very bien. because 
it is ze subject of the rubnque 
of today. 

-Nanisme is the subject of 
today and ze chapeau of my 
aunt is quite plus grand than ie 
garden of mon onde. 
•You know. 1 haven't any argent 
in my pocket. 

•You are very mal. pal. What do 
you ntde money for? 
•I want to go to my psychanahsl 
-What do you nide a psychana- 
hst tor 1 ' 

-Je suis iust amnesic. Oedipus 
complexed. claustrophobic, timi- 
ditic, asthenic, ain't got no 
money, and I am not alcoholic 
tcoubtier all the rest, 
-c'est tout folk' 

•Yes. Miche. but I souhaite you 
aide me a little to resoudre all 
my problems 

-You mean the fact that you are 
tres fatigue and you can't think 
of anything to say"* 
-Yes. 

•So I am going to help you l 
shall ask you some questions 
and you give me the reponses 
Ok? 

-Sans probleme. my friend. 
■All right. Are we doing !his arti- 
cle in english under the falla- 
cious pretexte that the logiciel 
is entierely in trench -5 * 
-Precisely. II suflit de voir Ie nom 
de la boite. 



-Ca y est. fas craque. I'aban- 

donnes I'anglais? 
-Ouaip. 
-Not me Is the but of the game 

to loose all the complexes? 
•Ben tiens, je suis plus amnesi- 

que. 
-T'es dans un drole d'elat, en 

tous cas. Comment fas fait? 
-J'ai retrouve mon arrlere grand- 

tante et son numero de compte 

en banque. 



-Good map (plan). Et lous is like 
that? 

-Ouais. en sortant du cinema, 
j'avais plus Ie vertige Sans par- 
ler d'Hamlet qui etait plutot nul. 
ce soir. 

-Bref. c'est tres bien, 

-Out. 

•Bon. on arrete. sinon. on pourra 
pas passer les quadris. On a 
interet a . . . merde plus de plat 

' Authentique 




PETITES ANNONCES 
GRATUITES 



VENDS PC 1500 + I6K {CE 
161) + Impnmante CE 150 + 
lecteur K7 pour 4200 F. (valeur 
6200 F) Tel: 387 13 28. 

VENDS console Tl 99 dA ■<■ mo- 
dulates SECAM/UHF + ma- 
gneto K7 compatible avec Tl 
(Thomson avec compteur) + 
cable magneto + maneltes de 
jeu + 7 livres pour TEXAS * 6 
modules dont Parsec. Tombs- 
tone City. etc... + K7 jeu retro I 
et II + synlhetiseuf de parole * 
module Basic etendu avec K7 
"Basic etendu ar soi-meme". A 
debattre. Mademoiselle BAR- 
REL Tel: (94) 94 32 77 (Heures 
repas). 

VENDS T07 + Basic + ma- 
gneto + Manettes + contrdleur 
et lecteur disquettes + 8 livres 
+ Pingo + Chasseur Omega + 
I.L L'mtrus + nombreux jeux 
sur K7 et disquettes + pro- 
gramme copie K7. Le tout 7500 
F. J.Pascal THIRION 149 rue 
Nordmann P 13 75013 PARIS. 
Tel: 535 03 17, 

ACHETE pour TI99 4A basic 
etendu, Prix a debattre. Eric SO- 
LECKI 26 rue Faolly 59165 AU- 
BERCHICOURT, Tel: (27) 86 85 
78. 

VENDS ensemble T07 (unite 
centrale + basic + lecteur enre- 
gistreur de programmes + ex- 
tension memoire 16K) : 4000 F. 
(valeur 5000 F.). 

VENDS egalement logiciels pour 
T07: Pictor : 600 F. Melodia: 
600 F. Dialogue avec une saute- 
relle: 100 F. Chasseur Omega: 
100 F. Trofl: 100 F. Gael Sl- 
MARD 80 Galerie de I'Arlequin 
38100 GRENOBLE, Tel: (76) 09 
06 24. 

VENDS T07 (06/84) + Basic + 
Pictor ■*- Lep + 7 livres, Le tout 
3000 F, Monsieur GRIMAL 39 
bid Gambetta 72200 LA FLE- 
CHE. Tel: (43) 94 02 31. 



VENDS TI99'4A + magneto et 
cable + manettes - Base 
etendu * Munch man * Hopper 
+ Othelto + Parsec + basic par 
soi meme * Introduction au Tl 
Part 1 et 2 + livres 50 program- 
mes + Les grands ciassiques 
du jeu + La conduite du Tl 4 
graphisme 3D (valeur + 4000 
F ) vendu 3000 F. Bruno PAS- 
OUET 'Le Cammas' Cidex 5286 
31240 CASTELMAUROU 

L'UNION. Tel: (61) 09 19 16 

Pour TI99 4A VENDS module 
de jeu Parsec. Prix 200 F. Flo- 
rent TESSIER 8 Impasse Mau- 
passant 85000 LA ROCHE SUR 
YON. Tel;: (51)37 53 67. 

VENDS SPECTRUM 48K PERI- 
TEL sous garantie (3/84) + 3 
livres + 2 logiciels (yaleurs 
2789) vendu 2300 F. + Moni- 
teur ZENITH vert + cable peritel 
sous garantie (06.84) (valeurs 
1105 F.) vendu 900 F. Monsieur 
LOUSSUARN Tel: 728 41 27. 

VENDS PC 1500 + CE 151 (4 
Ko) avec manuels d'utilisation et 
d' instructions + 4 livres de pro- 
grammes (07/83) le tout 1800 F. 
a debattre. Demander Thierry au 
(3) 975 91 02{apres 19 H). 

VENDS extension memoire 16K 
pour T07. (valeur 800 F.) cede 
500 F. a debattre. Demander 
KHALID au 384 72 59. 

VENDS CBM 64 SECAM - lec- 
teur K7 - livres + cables UHF 
et Peritel + joystick + K7 
Echecs, Matrix et Divers pro- 
grammes. Le tout 3800 F. J. P. 
DENISSEL. 8 square Louis 
Chauvin 77680 ROISSY EN 
BRIE. Tel: 029 33 20 (de 18 H a 
20 H). 

VENDS ORIC 1 48K ameliore 
sortie son stereo Reset par 
poussoir + livres + K7 et cables 
: 2200 F. Jean GIRVES 9 rue St 
Amans 31130 BALMA. Tel: (61) 
24 30 00. 



MENU 




APPLE 


CmcMtfi 


Airy ANDRE 


Paga ■■ 


CANON X07 


Jump 


Fred TRANCART 
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FX 702P 


Eric ZMIRO 
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COMMODORE 64 


rjfts 


Laurent BRUERE 


Page 4 


VIC 20 


Vcfute 


Ph BOICHUT 


Paoe 17 


HECTOR Creaion de earaches 


Pascal FALLOT 
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HP 41 


Alp - :.■-.■ 


Bernard BLAY 
ORIC 1 
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Un : 


Hay SRUN 
MZ 80 
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URANIA II 


Francois BAUDOIN 
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PC 1500 


Alzan 


Jacques BERGEROT Page 19 


PC 1251 


Synthetiseur 


Patrick DELHINGEF 


Page 19 


ZX81 


Co-' snow? 


Francois THE LLIER 
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SPECTRUM Secret de la momie 


Vincent DUMESTRE 
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TRS 80 Logic Conversion 


F.TEREYGEOL 
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T199(b.e) 


Ring 


J.M.CHENY 
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T199(b.S) 


E space clos 


Didier DELANSAY 
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T07 


War block 


F.LOSFELD 
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Texas Instruments 



ACCESSOIRESTI99/4 
MwJuWtttxSeCMf-."-" 
CAWr i«reci m»5r>«o-o»s«lM 
Pare manenMjeui 

avec compwv » uMe magneto itynprc 
EPSOM ex ao fbicikx*- iraction 
lme*»rw«f SrioxraGP 500 

■ ■■ -■■ ■ 

PROGRAMME TION 

--. ;.■■; ■. ■ ■ : t . , .. ■■. ...... .. 



riLOGOii 



r 121 



OBGANrSATION 

r>... , ..,.■..,■- 

SUtrllK] 

MODULES EDUCATION 



MODULES LCOTIRS 




ConoKt'cu 


|47j00 




MuciMfc» 


I#7fl0 




■ 


■47jQ0 






147,00 




>-„p-..- ir 


1*1 O0 





HO00 




/•am 




25000 




. 




BOflJ 





NOUVEAUX LOGICIELS TEXAS 

■■■•■■;: pan 

Bulfrrurr- 

'■'" ■'!■•.•■■.-■ 

PROGRAMMES TEXAS EDUCATION : 

mood *i N9»«|i| 

tranfl ju II VW4 |/j 

If, VtYWI/jf. Of, projMmnw-, ,* r „ 1 1 j 



HEBDOGtCieLS SOFTAWA«E 
TIN-JB*ut«wnau ITjru. 



PRIXTTC 

500,00 
100.00 
JIOJX) 

3/0,00 
4.150,00 
ZSOOfiD 

ir/»,oo 



\l**rvtm*XM*xr 

■ ' ■ ■ 



OMg 

'A/vh Mjti 



,■■,'..., 

norm 



7SOJX) 


■ 


BOOJM 




1340.00 




895.00 




/ooo 




/5.00 




75,00 


n 


26ft0C 


■ 


375,00 


i 


J06M 


■ 


160,00 


: 


360.00 





2SOJO0 








mm 




i'AOt) 




2XUW 


■ 



JSO0 




75.00 




rj.oo 




7SiX) 


' 1 


WjOO 


1 


•KJX 


D 


150,00 


1 


150.00 
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DISPONIBLE : EXTENDED BASIC EUROPE 

AVEC MANUEL FRANQAIS 800 F 




INTERFACE PARALLELE IMPRIMANTE 1.090 F 
BRAIMCHEMENT IMMEDIAT EXTENSION 32 K 1.340 F 



. |Prro--,*iclfrog | 370,00 |D | 



MODULES FUNU/APE : 

PaMM (f*i I ?85,00 I r ] I Dnving Dcrwyi 

trtoMxe ?85 00 : : i«nt l*« 

Hm How I /S5.00 1,1 

MOOULES ATARI : 
P*mart I 35 

MoonPwoi | 350.00 | i | Of«-*W 



I 350,00 I I 

I 350.00 I r i | 

I 100.00 j D 1 

| 100.00 | H | 



PROMOTION 



b? Module B^SJC E1FMXJ USA m,ifn^i en <:.■■ 

k? a«ic paf ■ 

K7 AIDE A LA PPOGPAMMAtlON 

Lensembte 920.00F. 



le Module BASIC ErFNDU USA nwr.*l po Iimk-ii; 

K7SASIC PAJtSa-MfiMi 

K / AIDE A LA PROGRAMMADOrj 

.■.■■--■. 



Le Module aAStC E TFNOU u S A mnri rn fiano** 

EXTENSION Ml W ,W\ Q K EX1 

II l'//)M / 



L'ensemble 6,560,00 F. 



LOT N" 5 

Lp Module BASIC t-TENDU USA maXld "■ IS 

MAGNEIOCASSETrE LANSAV 

COMPTEUH * CAGLE MAGNETO 

MODULE JEUX 

SUPEK DEMON ATTAOUE 

BURGERTiME 

MUCHMAN 

V.) INrRODUCTION AUX Jf(J> I 
K7 INTRODUCriONAUX JEUX N J 

L'ensemble 1.995,00 F. 



LOT N" 6 

Pour leu* qui , 

Ci nudk w <■: le leciem de 

dfsawttn 

I CARTE P CODE 

'ASCA1 COMPtLEUR 
i UCSO fASCAt LINKER 
I UCSO PASCAL EDHEUR 
I EDirORASSEMBLIUR 
I DISOUETrF MATHS 

■ ICH1ER ri AORESSES 
I OISOUETTE AIDE A \A PROGRAMM IJ 
I OlSOUEnE AIDE A LA PROGRAMM III 

L ensemble 3.1 



I MODUIE liASlf f IEISJOU USA m.irnjpf rn f Ilt , u ,„.. 

I MODUIE Tl CAJ.C 

I MODULE CONSEIL FINANCIER 

I MODULE GESTION DE RAPPORIS 

I MOOULE DE fICHIER 

I INTERFACE PARAllELE II 99/4 

I IMPRIMANTE GP W0 SEIKOCHA 

L'ensemble 5.300,00 F. 



■v 


ai 





Deux plus : 

Pour voire Ti 99/4 A une 

extension memoire 32 K Ram 

exterleure, 

Vous allez alnsl, avec 48 K, 

reallser des programmes plus 

performants. 

Un Interface parallete type 

Centronics vous permet de 

connecter des Imprlmantes 

comme Epson ou Selkoscha. 



BON DE COMMANDE 

TARIFS OCTOBRE 1984 
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LA RtGLt A CALCUL 
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